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COLOR COMPUTER 
DISK EDITOR ASSEMBLER WITH ZBUG 


CUSTOM MANUFACTURED 
IN USA FOR RADIO SHACK 
A DIVISION OF TANDY CORPORATION 


Vi. 


TERMS AND CONDITIONS OF SALE AND LICENSE OF TANDY COMPUTER EQUIPMENT AND SOFTWARE PURCHASED 
FROM RADIO SHACK COMPANY-OWNED COMPUTER CENTERS, RETAIL STORES AND RADIO SHACK FRANCHISEES OR 
DEALERS AT THEIR AUTHORIZED LOCATIONS 


LIMITED WARRANTY 
CUSTOMER OBLIGATIONS 


A. CUSTOMER assumes full responsibility that this computer hardware purchased (the ‘‘Equipment’’), and any copies of software included with the 
Equipment or licensed separately (the ‘‘Software’’) meets the specifications, capacity, capabilities, versatility, and other requirements of CUSTOMER. 

B. CUSTOMER assumes full responsibility for the condition and effectiveness of the operating environment in which the Equipment and Software are to 
function, and for its installation. : 


LIMITED WARRANTIES AND CONDITIONS OF SALE 


A. For a period of ninety (90) calendar days from the date of the Radio Shack sales document received upon purchase of the Equipment. RADIO SHACK 
warrants to the original CUSTOMER that the Equipment and the medium upon which the Software is stored is free from manufacturing defects. This 
warranty is only applicable to purchases of Tandy Equipment by the original customer from Radio Shack company-owned computer centers, 
retail stores, and Radio Shack franchisees and dealers at their authorized locations. The warranty is void if the Equipment’s case or cabinet has 
been opened, or if the Equipment or Software has been subjected to improper or abnormal use. If a manufacturing defect is discovered during the 
stated warranty period, the defective Equipment must be returned to a Radio Shack Computer Center, a Radio Shack retail store, a participating 
Radio Shack franchisee or a participating Radio Shack dealer for repair, along with a copy of the sales document or lease agreement. The original 
CUSTOMER'S sole and exclusive remedy in the event of a defect is limited to the correction of the defect by repair, replacement, or refund of the 
purchase price, at RADIO SHACK’S election and sole expense. RADIO SHACK has no obligation to replace or repair expendable items. 

B. RADIO SHACK makes no warranty as to the design, capability, capacity, or suitability for use of the Software, except as provided in this paragraph. 
Software is licensed on an ‘‘AS IS” basis, without warranty. The original CUSTOMER’S exclusive remedy, in the event of a Software manufacturing 
defect, is its repair or replacement within thirty (30) calendar days of the date of the Radio Shack sales document received upon license of the 
Software. The defective Software shall be returned to a Radio Shack Computer Center, a Radio Shack retail store, a participating Radio Shack 
franchisee or Radio Shack dealer along with the sales document. 

C. Except as provided herein no employee, agent, franchisee, dealer or other person is authorized to give any warranties of any nature on behalf of 
RADIO SHACK. 

D. EXCEPT AS PROVIDED HEREIN, RADIO SHACK MAKES NO EXPRESS. WARRANTIES, AND ANY IMPLIED WARRANTY OF MERCHANTABILITY OR 
FITNESS FOR A PARTICULAR PURPOSE IS LIMITED IN ITS DURATION TO THE DURATION OF THE WRITTEN LIMITED WARRANTIES SET FORTH 
HEREIN. 

E. Some states do not allow limitations on how long an implied warranty lasts, so the above limitation(s) may not apply to CUSTOMER. 


LIMITATION OF LIABILITY 


A. EXCEPT AS PROVIDED HEREIN, RADIO SHACK SHALL HAVE NO LIABILITY OR RESPONSIBILITY TO CUSTOMER OR ANY OTHER PERSON OR 

ENTITY WITH RESPECT TO ANY LIABILITY, LOSS OR DAMAGE CAUSED OR ALLEGED TO BE CAUSED DIRECTLY OR INDIRECTLY BY 

“EQUIPMENT” OR “SOFTWARE” SOLD, LEASED, LICENSED OR FURNISHED BY RADIO SHACK, INCLUDING, BUT NOT LIMITED TO, ANY 

INTERRUPTION OF SERVICE, LOSS OF BUSINESS OR ANTICIPATORY PROFITS OR CONSEQUENTIAL DAMAGES RESULTING FROM THE USE OR 

OPERATION OF THE “EQUIPMENT” OR ‘‘SOFTWARE.” IN NO EVENT SHALL RADIO SHACK BE LIABLE FOR LOSS OF PROFITS, OR ANY 

INDIRECT, SPECIAL, OR CONSEQUENTIAL DAMAGES ARISING OUT OF ANY BREACH OF THIS WARRANTY OR IN ANY MANNER ARISING OUT OF 

OR CONNECTED WITH THE SALE, LEASE, LICENSE, USE OR ANTICIPATED USE OF THE “EQUIPMENT” OR ‘“‘SOFTWARE.” 

NOTWITHSTANDING THE ABOVE LIMITATIONS AND WARRANTIES, RADIO SHACK’S LIABILITY HEREUNDER FOR DAMAGES INCURRED BY 

CUSTOMER OR OTHERS SHALL NOT EXCEED THE AMOUNT PAID BY CUSTOMER FOR THE PARTICULAR ‘EQUIPMENT’ OR “SOFTWARE” 

INVOLVED. 

RADIO SHACK shall not be liable for any damages caused by delay in delivering or furnishing Equipment and/or Software. 

No action arising out of any claimed breach of this Warranty or transactions under this Warranty may be brought more than two (2) years after the 

cause of action has accrued or more than four (4) years after the date of the Radio Shack sales document for the Equipment or Software, whichever 

first occurs. 

D. Some states do not allow the limitation or exclusion of incidental or consequential damages, so the above limitation(s) or exclusion(s) may not apply 
to CUSTOMER. 


SOFTWARE LICENSE 


RADIO SHACK grants to CUSTOMER a non-exclusive, paid-up license to use the TANDY Software on one computer, subject to the following provisions: 
. Except as otherwise provided in this Software License, applicable copyright laws shall apply to the Software. 
B. Title to the medium on which the Software is recorded (cassette and/or diskette) or stored (ROM) is transferred to CUSTOMER, but not title to the 
Software. 


Ow 


C. CUSTOMER may use Software on one host computer and access that Software through one or more terminals if the Software permits this function. 

D. CUSTOMER shall not use, make, manufacture, or reproduce copies of Software except for use on one computer and as is specifically provided in 
this Software License. Customer is expressly prohibited from disassembling the Software. 

E. CUSTOMER is permitted to make additional copies of the Software only for backup or archival purposes or if additional copies are required in the 


operation of one computer with the Software, but only to the extent the Software allows a backup copy to be made. However, for TRSDOS Software, 
CUSTOMER is permitted to make a limited number of additional copies for CUSTOMER’S own use. 

F. CUSTOMER may resell or distribute unmodified copies of the Software provided CUSTOMER has purchased one copy of the Software for each one 
sold or distributed. The provisions of this Software License shall also be applicable to third parties receiving copies of the Software from 
CUSTOMER. 

G. All copyright notices shall be retained on all copies of the Software. 


. APPLICABILITY OF WARRANTY 


A. The terms and conditions of this Warranty are applicable as between RADIO SHACK and CUSTOMER to either a sale of the Equipment and/or 
Software License to CUSTOMER or to a transaction whereby Radio Shack sells or conveys such Equipment to a third party for lease to CUSTOMER. 

B. The limitations of liability and Warranty provisions herein shall inure to the benefit of RADIO SHACK, the author, owner and or licensor of the 
Software and any manufacturer of the Equipment sold by Radio Shack. 


STATE LAW RIGHTS 
The warranties granted herein give the original CUSTOMER specific legal rights, and the original CUSTOMER may have other rights which vary from 
State to state. 
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To Our Customers... 


The heart of the Color Computer is a 6809E “proces- 
sor.” It controls all other parts of the Color Computer. 


The processor understands only a code of Os and 1s, 
not at all intelligible to the human mind. This code is 
called “6809 machine code.” 


When you run a BASIC program, a system called the 
“BASIC Interpreter” translates each statement, one ata 
time, into 6809 machine code. This is an easy way to 
program, but inefficient. 


The Disk EDTASM lets you program using an intelligible 
representation of 6809 machine code, called ‘assembly 
language,” that talks directly to the processor. You then 
assemble the entire program into 6809 machine code 
before running it. 


Programming with the Disk EDTASM gives you these 
) benefits: 


@ You have direct and complete control of the Color 
Computer. You can use its features — such as high 
resolution graphics — in ways that are impossible with 
BASIC. 


e Your program runs faster. This is because it is already 
translated into 6809 machine code when you run it. 


To Use the Disk EDTASM 
You Need... 


A Color Computer Disk System that has at least 16K of 
RAM, preferably 32K. (A 16K System will leave you little 
room for programs.) 


The Disk EDTASM 
Contains: 


e EDTASM/BIN, a system for creating 6809 programs. 


EDTASM contains: 


An editor, for writing and editing 6809 assembly- 
language programs. 


An assembler, for assembling the programs into 
6809 machine code. 


ZBUG, for examining and debugging 6809 
machine-code programs. 


You must have 32K to run EDTASM. If you have 16K, 
run EDTASMOV (described next). 


e EDTASMOV/BIN, a memory-efficient version of 


EDTASM consisting of overlays. EDTASMOV con- 
tains the editor and assembler, but not ZBUG. 


e ZBUG/BIN, a stand-alone version of ZBUG, primarily 
for use with EDTASMOV. 


e DOS/BIN, a disk operating system. DOS contains disk 
access routines that you can call from an assembly 
language program. (You cannot call BASIC’s disk ac- 
cess routines with any program other than BASIC.) 


EDTASM/BIN, EDTASMOV/BIN, and ZBUG/BIN all 
use DOS routines and must be run with DOS. 


The Disk EDTASM also contains: 
e DOS/BAS. A BASIC program that loads DOS/BIN. 


How to Use this Manual 


This manual is organized for both beginning and ad- 
vanced assembly language programmers. Sections I-IV 
are tutorials; Section V is reference. 


Beginning Programmers: 


Read Section | first. It shows how the entire system 
works and explains enough about assembly language to 
get you started. 


Then, read Sections II, Ill, and IV in any order you want. 
Use Section V, “Reference,” as a summary. 


This manual does not try to teach you 6809 mnemonics. 
To learn this, read: 


Radio Shack Catalog #62-2077 
by William Barden Jr. 


6809 Assembly Language Programming 
by Lance A. Leventhal 


Nor does it teach you disk programming concepts. To 
learn these, read: 


Color Computer Disk System Manual 
(Radio Shack Catalog #26-3022) 


Advanced Programmers: 


First, read Chapters 71 and 2 to get started and see 
how the entire system works. Then, read Section V, 
“Reference.” 


You can use the DOS program listing to obtain informa- 
tion on routines and addresses not explained in this 
manual. Please note the following: 


Radio Shack supports only these DOS routines: 
OPEN, CLOSE, READ, and WRITE. Additional 
DOS routines are listed in Reference H. However, 
Radio Shack does not promise to support them. 


Even more DOS routines and addresses can be 
found in the program listing. However, Radio Shack 
does not promise to support them nor even provide 
them in the future. 


For technical information on the Color Computer Disk 
System and 6809, refer to 6809 Assembly Language 
Programming and Color Computer Disk System Manual, 
listed above. | 


This manual uses these 
terms and notations: 


KEY To denote a key you must press. 
Italics To denote a value you must supply. 
filespec To denote a DOS file specification. A DOS 


filespec is in one of these formats: 


filename/ext:drive 
filename.ext:drive 


filename has one to eight characters. 
extension has one to three characters. 


drive is the drive number. If the drive num- 
ber is omitted, DOS uses the first available 
drive. 


$ To denote a hexadecimal (Base 16) num- 
ber. For example, $0F represents hexa- 
decimal OF, which is equal to 15 in decimal 
(Base 10) notation. 
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SECTION |! 
GETTING STARTED 
This section gets you started using the Disk 
EDTASM and explains some concepts you 
, need to know. 


Chapter 1/ Preparing Diskettes 


Before using the Disk EDTASM, you need to format 
blank diskettes and back up the master Disk EDTASM 
diskette. 


Formatting Blank Diskettes 


1. Power up your disk system and insert a blank disk- 
ette in Drive 0. (See the Color Computer Disk Sys- 
tem Manual for help.) 


2. At the OK prompt, type: 
DSKINI@ (ENTER 


BASIC formats the diskette. When finished, it again 
shows the OK prompt. 


Making Backups 
of Disk EDTASM 
Single-Drive Systems 
1. Insert the master Disk EDTASM diskette, your 
“source” diskette, in Drive 0. 


2. At the BASIC OK prompt, type: 
BACKUP @ TO @ 


3. BASIC then prompts you to insert the “destination” 
diskette. Remove the source diskette and insert a 
formatted diskette. Press (ENTER 


4. BASIC prompts you to alternatively insert the 
source, then destination diskettes. When the back- 
up is finished, the OK prompt appears. 


The destination diskette is now a duplicate of the master 
Disk EDTASM diskette. 


Multi-Drive Systems 
1. Insert the master Disk EDTASM diskette in Drive 0. 
2. Insert a formatted diskette in Drive 1. 
3. At BASIC’s OK promot, type: 
BACKUP @ TO 1 


BASIC makes the backup. When the backup is 
finished, the OK prompt appears. 


The diskette in Drive 1 is now a duplicate of the master 
Disk EDTASM diskette. 
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Chapter 2/ 
Running a Sample Program 


This “sample session” gets you started writing programs 
and shows how to use the Disk EDTASM. The next 
chapters explain why the program works the way it does. 


1. Load and Run DOS 


Insert the Disk EDTASM diskette in Drive 0. At the OK 
prompt, type: 
RUN "DOS" (CENTER 


DOS then loads and puts you in its “command mode.” 
The screen shows the DOS command menu: 


-™ 1. Exit to BASIC 


e+ Exec a Program 

oe Start Clock Oiselay 
4, Disk Allocation Map 
2+ Copy Files 

Se DITectory 


DOS consists of many disk input and output routines 
which EDTASM uses. You must load DOS before load- 
ing EDTASM. 


2. Load and Run EDTASM 


At the DOS Menu, press (2) to select “Execute a Pro- 
gram.” The screen asks for the name of a program file. 


If your system has 32K or more, use EDTASM. If it has 
only a 16K system, use EDTASMOV. 


Loading EDTASM: 
Type EDTASM. The screen shows: 


EXECUTE A PROGRAM 
PROGRAM NAME: CEDTASM 1/BIN 


lf you make a typing error, use the to reposition the 
cursor at the beginning of the line, then correct the mis- 
take. Replace any trailing characters with blank spaces. 


Press (ENTER). EDTASM loads and shows its startup 
message. 


Loading EDTASMOV: 
Type EDTASMOV. The screen shows: 


EXECUTE A PROGRAM 
PROGRAM NAME: CEDTASMOVYI/BIN 


If you make a mistake, use the to reposition the cur- 
sor, then correct the mistake. 


EDTASMOV loads and shows its startup message. 


Always keep EDTASMOV in Drive 0. It contains overlays 
which it loads into memory as required. It always looks 
for these overlays in Drive 0. 


3. Type the Source Program 


Notice the asterisk (*) prompt. This means you are in the 
editor program of EDTASM or EDTASMOV. The editor 
lets you type and edit an assembly language “source” 
program. 


At the * prompt, type: 
IT (ENTER 


This puts you in the editor's insert mode. The editor re- 
sponds with line number 00100. Type: 


START LDA #¢F9 (ENTER 


The right arrow tabs to the next column. (ENTER) inserts 
the line in the editor’s “edit buffer.” The $ means that F9 
is a hexadecimal (Base 16) number. 
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re 


into the memory area just above the EDTASM or 
EDTASMOV program. To let you know what it has done, 


Your screen should show: 


OB1iB2 START LDA # EFS ‘aipee Ea age ee 
0119 it prints this listing: 
meaning that you inserted line 100 and can now insert 4B28 86 FS 021890 START 
line 110. LDA # $F S 
; * A4B2ZA 8 @ 
lf you make a mistake, press (BREAK). Then, at the LDX ‘ sien Rete 
prompt, delete Line 100 by typing: AB2D A? 30 00120 SCREEN 
Did@@ (ENTER STA rK+ 
; 4B2F 8C 2600 2B1i3e8 
Now, insert Line 100 correctly in the same manner CMPY #$600 
| described above. ABA? 25 cS AAidg 
Insert the entire assembly language program listed BNE SCREEN 
halow. 4B34 AD SF A@®@O® 90150 WAIT 
| | JSR [$ADOO] 
Note that line 150 uses brackets. Do not substitute 4B38 27 FA QB1iG¢? 
parentheses for the brackets. To produce the left BEQ WATT 
bracket, press (SHIFT and C4) at the same time. To AB3Q OF +4 QB1i70 
produce the right bracket, press (SHIFT) and at CLR $74 
the same time. 4B3C GE OF FFFE 00180 
20100 START LDA #$F9 SMP CSF FFE 
QG1iig LD #SA00 4B40 221908 DONE 
00120 SCREEN STA K+ eu ! : 
00130 CMPX #$600 0000 00200 
00140 BNE SCREEN END 
O15 WAIT JSR C$AGOO] 9GG0a TOTAL ERRORS = 
20168 BEQ WATT ws 
00170 CLR $7 1 DONE ae 
00189 JMP [$FFFE] SCREEN puciedel 
20190 DONE EQU * START 4B28 
QBZOBO END WAIT 4634 


If you make a mistake, press (BREAK). Then, at the * 
prompt, delete the program by typing: 


DH: * 
Now, insert the program correctly. 


When finished, press (BREAK). The program you have in- 
serted is an assembly language “source” program, 
which we'll explain in the next chapter. 


4. Assemble the Source 
Program in Memory 


At the * prompt, type: 
A/IM/WE (ENTER 


which loads the assembler program. The assembler then 
assembles your source program into 6809 machine code 


(If using EDTASMOV, the numbers will be different.) 


lf the assembler does not print this entire listing, but 
stops and shows an error message instead, you have an 
error in the source program. Repeat Steps 3 and 4. 


The assembler listing is explained in Figure 7 of 
Chapter 7. 


5. Prepare the 
Program for DOS 


Before saving the program, you need to prepare it so 
that you can load and run it from DOS. 


First, you must give it an “origination address” for DOS 
to use in loading the program back into memory. (We 
recommend you use Address $1200, the first address 


| Javailable after the DOS system.) To do so, type: 


15@ (ENTER 
and insert this line: 
52 ORG 


Next, you need to add two lines to your program to tell 
DOS how long the program is. Insert these lines: 


6@ BEGIN JMP START 
70 FDB DONE-BEGIN 


When finished, press (BREAK). To see the entire program, 
type: 

Pi: # 
It should look like this: 


$1200 


2BASO ORG $1200 
22060 BEGIN JMP START 
22878 FDB DONE-BEGIN 
202188 START LDA ##FQ9 
28110 LDX ##400 
@G120@ SCREEN STA sX+ 
08130 CMPA #8600 
2Z140 BNE SCREEN 
201530 WAIT JSR [$AG8e ] 
20160 BEQ WAIT 
a> 00170 CLE $71 
00180 JMP LSrrre. 
221908 DONE EQU +* 
BdL0O END 


If you make a mistake, delete the line with the error 
and insert it again. 


6. Save the Source 
Program on Disk 


To save the source program, type (at the * prompt): 
WO SAMPLE (ENTER 


This saves the source program on disk as SAMPLE/ 
ASM. 


7. Save the Assembled 
Program on Disk 


At the * prompt, type: 


AD SAMPLE /SR (ENTER 


SCTE 


Be sure you have a blank space between SAMPLE and 
/SR. This causes the assembler to again assemble the 
source program into 6809 code. This time, the Assem- 
bler saves the assembled program on disk as SAMPLE/ 
BIN. 


(You must use the /SR “switch” to assemble any pro- 
gram that you want to load and run from DOS.) 


8. Run the Assembled 
Program from DOS 


To run the assembled program, you need to be in the 
DOS command mode. At the * prompt, type: 


K (ENTER 


which causes the Editor to return you to the DOS com- 
mand menu. Press (2) to execute a program. Then type 
SAMPLE, the name of the assembled program. (The 
assembler assumes you mean SAMPLE/BIN.) The 
screen shows: 


EXECUTE A PROGRAM 
PROGRAM NAME: [CSAMPLE J/BIN 


Press (ENTER). The SAMPLE program executes, filling 
your entire screen with a graphics checkerboard. 


Press any key to exit the program. The program returns 
to BASIC startup message. 


9. Debug the Program 
(if necessary) 


ZBUG lets you to look at memory. How you load ZBUG 
depends on whether you are using EDTASM or EDTAS- 
MOV. 


EDTASM Users: 


You can load ZBUG from EDTASM. Load DOS and 
EDTASM again (Steps 1 and 2). Then, at the * prompt, 


type: 
< (ENTER 


EDTASM loads its ZBUG program and displays ZBUG’s 
# prompt. You can now examine any memory address. 
Type: 


ABBA / 
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and ZBUG shows you what is in memory at this address. 
Press C1) a few times to look at more memory addres- 
ses. When finished, press (BREAK). 


In Chapter 8, we'll show you how to use ZBUG to ex- 
amine and test your program. To return to EDTASM's 
editor, type: 


E (ENTER 


EDTASMOV Users: 


You must use the Stand-Alone ZBUG. Load DOS again 
(Step 1). At the DOS Menu, press (2), “Execute a Pro- 
gram,” and run the ZBUG program. After typing ZBUG, 
the screen shows: 


EXECUTE A PROGRAM 
PROGRAM NAME: C2BUG i7GLN 


DOS loads the stand-alone ZBUG and displays ZBUG’s 
# prompt. You can now examine any memory address. 
Type: 


3880/ 


and ZBUG shows you what is in memory at this address. 
Press C4) a few times to look at more memory addres- 
ses. When finished, press (BREAK). 


In Chapter 8, we'll show you how to use ZBUG to ex- 
amine and test your program. To return to DOS, type: 


K (ENTER 


ee 


Chapter 3/ Overview 


This chapter is for beginning assembly language pro- 
grammers. It explains some concepts you need. If you're 
not a beginner, use this chapter as a refresher or skip it. 


The Color 
Computer Hardware 


The Color Computer consists of: 


@ The 6809E Processor 
@ Memory 
@ Input/Output Devices 


This shows how they relate to each other: 


//O /O 
device device 
/O /O 
device device 


The Processor 


The processor processes all data going to each memory 
address and device. It contains: 


@ Registers — for temporarily storing 1- or 2-byte 
values. 


“ 


e Buses — for transferring data to or from the processor. 


All instructions to the processor must be in 6809 
machine code: a code of Os and 1s containing 
“opcodes” and data. ‘“Opcodes’”’ are instructions that tell 
the processor to manipulate data in some way. 


For example, the machine-code instruction “10000110 
11111001” contains: 


@ The opcode “10000110” (decimal 134 or hexadecimal 
86) 

@ The data “11111001” (decimal 249 or hexadecimal 
FQ) 


This instruction tells the processor to load Register A 
with 11111001. 


Memory 


Memory is a storage area for programs and data. There 
are two kinds of memory: 


@ Random access memory (RAM) — for temporary stor- 
age of programs or data. When you load a program 
from disk, you load it into RAM. Many opcodes store 
data in RAM temporarily. 


@ Read only memory (ROM) — for permanent storage 
of programs. BASIC, as well as any program pack you 
use, is stored in ROM. The Color Computer contains 
several “ROM routines” that you can use to access 
the keyboard, screen, or tape recorder. 


When writing an assembly language program, you must 
constantly be aware of what’s happening in memory. For 
this reason, this manual provides a memory map. (See 
Reference J.) 


Devices 


All other parts of the hardware are called devices. A de- 
vice expects the processor to input or output data to it in 
a certain format. To input or output data in this format, 
you can use these pre-programmed subroutines: 
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@ Routines stored in ROM (ROM routines) — for input- 
ting or outputting to the keyboard, screen, printer, or 
tape recorder. 


@ Routines stored in DOS (DOS routines) — for input- 
ting or outputting to disk. 


The Disk EDTASM 
Assembler 


The Disk EDTASM looks for three fields in your instruc- 
tions: label, command, and operand. For example, in this 
instruction: 


BEGIN JMP START 


BEGIN is the label. JMP is the command. START is the 
operand. 


In the label field, it looks for: 
@ Symbols (symbolic names) 
In the command field, it looks for: 


@ Mnemonics 
e Pseudo Ops 


In the operand field, it looks for: 


@ Symbols 

e@ Operators 

e@ Addressing-Mode Characters 
e Data 


Symbols 


A symbol is similar to a variable. It can represent a value 
or a location. BEGIN (in the sample session) is a symbol 
that represents the location of the instruction JMP 
START. START is also a symbol that represents the 
location of LDA #$F9. 


Mnemonics 


A mnemonic is a symbolic representation of an opcode. 
It is a command to the processor. “LDA” is a mnemonic. 
Depending on which “addressing-mode character’ you 
use, LDA represents one of these opcodes: 


10000110 
10010110 
10110110 
10100110 


10 


(Addressing-mode characters are discussed below.) 


Mnemonics are specific to a particular processor. For ex- 
ample, Radio Shack’s Model 4 uses the Z80 processor, 
which understands Z80 mnemonics, rather than the 
6809 mnemonics. 


Pseudo Ops 


A pseudo op is a command to the assembler. END (in 
the sample session) is a pseudo op. It tells the assem- 
bler to quit assembling the program. 


Data 


Data is numbers or characters. Many of the mnemonics 
and pseudo ops call for data. Unless you use an oper- 
ator (described next), the assembler interprets your data 
as a decimal (Base 10) number. 


Operators 


An operator tells the assembler to perform a certain op- 
eration on the data. In the value $1200, the $ sign is an 
operator. It tells the assembler that 1200 is a hexadeci- 
mal (Base 16) number, rather than a decimal (Base 10) 
number. 


The more commonly used operators are arithmetic and 
relational. Addition (+) and equation (=) are examples 
of these operators. 


Addressing-Mode Characters 


An addressing mode character tells the assembler how it 
should interpret the mnemonic. The assembler then 
assembles the mnemonic into the appropriate opcode. 


The sample session uses the # character with the LDA 
mnemonic to denote the “immediate” addressing mode. 
This causes the assembler to assemble LDA into the 
opcode 10000110. 


The immediate mode means that the number following 
the mnemonic (in this case, $F9) is data rather than an 
address where the data is stored. 


Pseudo ops, symbols, operators, and addressing-mode 
characters vary from one assembler to another. Section 
[il explains them in detail. 


oo 


Sample Program 


This is how each line in the sample program works: 
2 ORG $1200 


ORG is a pseudo op for “originate.” It tells the assem- 
bler to begin loading the program at Location $1200 
(Hexadecimal 1200). This means that when you load 
and run the program from DOS, the program starts at 
Memory Address $1200. 


60 BEGIN JMP START 


BEGIN is a symbol. It equals the location where the JMP 
START instruction is stored. 


JMP is a mnemonic for “jump to an address.” It causes 
the processor to jump to the location of the program 
labeled by the symbol START, which is the LDA #$F9 
instruction. You must use JMP or LBRA as the first in- 
struction in a DOS program. 


70 FDB DONE-BEGIN 


FDB is a pseudo op for “store a 2-byte value in mem- 
ory.” It stores the value of DONE-BEGIN (the length of 
the program) in the next two bytes of memory. You must 
store this value at the beginning of the program to tell 


pos how much of the program to load. 


20100 START LDA ##F9 


START is a symbol. It equals the location where LDA 
#$F9 is stored. 


LDA is a mnemonic for “load Register A.” It loads Regis- 
ter A with $F9, which is the hexadecimal ASCII code for 
a graphics character. The ASCII characters are listed in 
Reference K. 


20110 LDX 


LDX is a mnemonic for “load Register X.” It loads Regis- 
ter X with $400, the first address of video memory. Ref- 
erence J shows where video memory begins and ends. 


08120 SCREEN STA 


SCREEN is a symbol. It equals the location where STA 
»X+ is stored. 


#EA 00 


vf 
ees + 


STA is a mnemonic for “store Register A.” It stores the 
contents of Register A ($F9) in the address contained in 
Register X ($400). This puts the $F9 graphics character 
at the upper left corner of your screen. 


The “,” and “+” are addressing-mode characters. The , 
causes the processor to store $F9 in the address con- 
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tained in Register X. The + causes the processor to 
then increment the contents of Register X to $401. 


00130 CMPX #46090 


CMPX is a mnemonic for “compare Register X.” It com- 
pares the contents of Register X with $600. If Register X 
contains $600, the processor sets the “Z’” bit in the Reg- 
ister CC to 1. 


00140 BNE SCREEN 


BNE is a mnemonic for “branch if not equal.” It tells the 
processor return to SCREEN (the STA,X+ instruction) 
until the Z bit is set. 


The BNE SCREEN instruction creates a loop. The pro- 
gram branches back to SCREEN, filling all video mem- 
ory addresses with $F9, until it fills Address $600. At that 
time, Register X contains $600, Bit Z is set, and program 
control continues to the next instruction. 


08150 WAIT JSR [C#AG8O] 


JSR is a mnemonic for “jump to a subroutine.” $A000 is 
a memory address that stores the address of a ROM 
routine called POLCAT. (See Reference F.) 


POLCAT scans the keyboard to see if you press a key. 
When you do, it clears the Z bit. 


The “[ ]” are addressing-mode characters. They tell the 
processor to use an address contained in an address, 
rather than the address itself. Always use the ‘“[ ]’ signs 
when calling ROM routines. 


20160 BEQ WAIT 


BEQ is a mnemonic for “branch if equal.” It branches to 
the JSR [$A000] instruction until the Z bit is clear. This 
causes the program to loop until you press a key, at 
which time POLCAT clears the Z bit. 


00170 CLR 
00189 JMP 


CLR is a mnemonic for “clear,” and JMP is a mnemonic 
for “jump to memory address.” These two instructions 
end the program and return to BASIC’s startup mes- 
sage. 


(CLR inserts a zero in Address $71; this signals that the 
system is at its original “uninitialized” condition. JMP 
goes to the address contained in Address $FFFE; this is 
where BASIC initialization begins.) 


00180 DONE EQU + 


EQU is a pseudo op. It equates the symbol DONE with 
an asterisk (*), which represents the last line in the 
program. 


$71 
CSPrre J 
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08130 END 


END is a pseudo op. It tells the assembler to quit 
assembling the program. 
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Section ll 


COMMANDS 


SOGNVININOD 


Section li 


COMMANDS 


This section shows how to use the many 
“™ Disk EDTASM commands. Knowing these 
commands will help you edit and test your 


program. 
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Chapter 4/ Using the DOS Menu 
(DOS Commands) 


When you first enter DOS, a menu of six DOS com- 
mands appear on the screen. Chapter 2 shows how to 
use the first two DOS commands. This chapter shows 
how to use the remaining commands: 


e@ Start Clock Display 
@ Disk Allocation Map 
@ Copy Files 

e@ Directory 


To use the examples in this chapter, you need to have 
the SAMPLE disk files, which you created in Chapter 2, 
on the diskette in Drive 0. 


Directory 


The DOS “directory” command lets you select the direc- 
tory entries you want to see, using three fields: filename, 
extension, and drive number. 


To select the directory entries, press (6) at the DOS 
Menu. Then, press the (¢) to move the cursor left or G@) 
to move right. 


Type this line to select all directory entries that have the 
filename SAMPLE. 


LSAMPLE®e! CERT ££01 <FILE SPEC 


Use the (SPACEBAR) to erase characters. Press (ENTER 
when finished. Then, press any key to return to the DOS 
menu, and press (6) to return to the directory. 


Type this line to select all directory entries with the ex- 
tension /BIN: 

CORES EEER SY COIN Pies -aFrILE Sree 
Press (ENTER) when finished. Return to the main menu. 


To see all directory entries on the disk in Drive 0, simply 
press (ENTER) without specifying a filename or extension: 


CHHHHHHHE] C¥#e#] 2020] <FILE SPEC 
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Disk Allocation Map 


The “disk allocation map” command tells you how much 
free space you have on your diskettes. To see the map, 
press (4) at the DOS menu. 


DOS shows a map of the diskettes that are in each 
drive. The map shows how each of the diskette’s 68 
granules is allocated: 


e A period (.) means the granule is free. 


@ An X means all the sectors in the granule are currently 
allocated to a file. 


@ A number indicates how many sectors in the granule 
are currently allocated to a file. 


Press any key to return to the DOS menu. 


Copy Files 


The “Copy Files” command makes a duplicate of a disk 
file. To use it, press (5) at the DOS menu. DOS then 
prompts you for the names of the files. 


Single-Drive Copy 


The first example copies SAMPLE/ASM to another file 
named COPY/ASM. Use the C#) and C4) to position the 
cursor. Answer the prompts as shown: 


Source File Name CSAMPLE J] 
Extension CASM] 
Drive CO] 

Destination File Name LGCUPY ] 
Extension CASM] 
Drive CQ] 


If Drives are the same are 
using different diskettes? 
YY ae Si = [NJ 


YOU 
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When finished, press (ENTER). DOS copies SAMPLE/ 
ASM to a new file named COPY/ASM and then returns 
to the DOS menu. Check the directory (by pressing (6) 
and you'll see that both SAMPLE/ASM and COPY/ASM 
are on your diskette. 


The next example copies SAMPLE/ASM to another disk- 
ette. Answer the prompts as shown: 


Source File Name TSAMPLE J] 
Extension CASMI 
Drive [OQ] 

Destination File Name LCOeY. J 
Extension CASM] 
Drive ca] 


If Drives are the same are you 
using different diskettes? 


. ey RE Ars L'a 


Press (ENTER). DOS then prompts you to insert the 
source diskette. Press (ENTER) again. 


DOS then prompts you for a destination diskette. Insert 
the destination diskette and press (ENTER). After copying 
the file, DOS prompts you for a system diskette. If you 
press without inserting a system diskette, you will 
get a SYSTEM FAILURE error. 


When finished, it returns to the DOS menu. 
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Multi-Drive Copy 


This example copies SAMPLE/ASM in Drive 0 to SAM- 
PLE/ASM in Drive 1. Answer the prompts as shown: 


Source File Name [CSAMPLE J] 
Extension CASMI 
Drive CO] 

Destination File Name [SAMPLE ] 
Extension CASM] 
Drive Lig 


If Drives are the same are you 
using different diskettes? 


CO. a «ae ee CN] 


Start Clock Display 


The Color Computer has a clock that runs on 60-cycle 
interrupts. Since the clock skips a second or more when 
the computer accesses tape or disk, we recommend that 
you not use it while executing a program. 


To use the clock, press (3), “Start Clock Display.” Six 
digits appear at the upper right corner of your screen. 
The first two are hours, the next are minutes, and the 


next are seconds. This clock counts the time until you | 


exit DOS. 


— 


SCSI 


Chapter 5/ Examining Memory 
ZBUG Commands — Part | 


To use the Disk EDTASM, you must understand the 
Color Computer’s memory. You need to know about 
memory to write the program, assemble it, debug it, and 
execute it. 


In this chapter, we'll explore memory and see some of 
the many ways you can get the information you want. To 
do this, we’ll use ZBUG. 


If you are not “in” ZBUG, with the ZBUG # prompt dis- 
played, you need to get in it now. 


EDTASM: Load and run DOS, then execute the 
EDTASM program. At the editor’s « prompt, type 


= (ENTER 


EDTASMOV: Load and run DOS, then execute the 
ZBUG program. 


You should now have a # prompt on your screen. This 
‘means you are in ZBUG and you may enter a ZBUG 
command. All ZBUG commands must be entered at this 
command level. You can return to the command level by 
pressing or (ENTER). 


Examining a 
Memory Location 


The 6809 can address 65,536 one-byte memory addres- 
ses, numbered 0-65535 ($0000-$FFFF). We'll examine 
Address $A000. At the # prompt, type: 


B (ENTER 
to get into the “byte mode.” Then type: 
ADa/ 


and ZBUG shows the contents of Address $A000. To 
see the contents of the next bytes, press C4). Use Cf) to 
scroll to the preceding address. 
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Continue pressing C) or Cf). Notice that as you use the 
(¥) the screen continues to scroll down. The smaller 
addresses are on the lower part of the screen. 


All the numbers you see are hexadecimal (Base 16). 
You see not only the 10 numeric digits, but also the 6 
alpha characters needed for Base 16 (A-F). Unless you 
specify another base (which we do in Chapter 9), ZBUG 
assumes you want to see Base 16 numbers. 


Notice that a zero precedes all the hexadecimal num- 
bers that begin with an alphabetic character. This is 
done to avoid any confusion between hexadecimal num- 
bers and registers. 


Examination Modes 


To help you interpret the contents of memory, ZBUG 
offers four ways of examining it: 


@ Byte Mode 

@ Word Mode 

@ ASCII Mode 

@ Mnemonic Mode 


Byte Mode 


Until now, you’ve been using the byte mode. Typing B 
ENTER), at the # prompt got you into this mode. 


The byte mode displays every byte of memory as a num- 
ber, whether it is part of a machine-language program or 
data. 


In this examination mode, the CG) increments the ad- 
dress by one. The Cf) decrements the address by one. 
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Word Mode 


Type to get back to the # prompt. To enter the 
word mode, type: 


li (ENTER 


Look at the same memory address again. Press the C}) 
key a few times. In this mode, the G_) increments the 
address by two. The numbers contained in each address 
are the same, but you are seeing them two bytes or one 
word at a time. 


Press the Cf) a few times. The C{) always decrements 
the address by one, regardless of the examination 
mode. 


Look at Address $A000 again by typing: 
AQDO/ 


Note the contents of this address “word.” This is the 
address where POLCAT, a ROM routine, is stored. 


Examine the POLCAT routine. For example, if $A000 
contains A1C1, type: 


A1ICi/ 


and you'll see the contents of the first two bytes in the 
POLCAT routine. We’ll examine this routine later in this 
chapter using the “mnemonic mode.” 


ASCIl Mode 
Return to the command level. To enter the ASCII mode, 
type: 

A (ENTER 


ZBUG now assumes the content of each memory 
address is an ASCII code. If the “code” is between $21 
and $7F, ZBUG displays the character it represents. 
Otherwise, it displays meaningless characters or 
“garbage.” 


Here, the ({) increments the address by one. 


Mnemonic Mode 


This is the default mode. Unless you ask for some other 
mode, you will be in the default mode. 


Return to the # prompt. To enter the mnemonic mode 
from another mode, type: 


M (ENTER 
Look at the addresses where the POLCAT routine is 
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stored. For example, if you found that POLCAT is at 
address $A1C1, type: 


A1Ci/ 


Press the (7) a few times. In the mnemonic mode, 
ZBUG assumes you’re examining an assembly language 
program. The (4) increments memory one to five bytes 
at a time by “disassembling” the numbers into the mne- 
monics they represent. 


For example, assume the first two addresses in POL- 
CAT contain $3454. $3454 is an opcode for the PSHS 
U,X,B mnemonic. Therefore, ZBUG disassembles $3454 
into PSHS U,x,B. 


Begin the disassembly at a different byte. Press (BREAK 
and then examine the address of POLCAT plus one. For 
example, if POLCAT starts at address $A1C1, type: 


A1C2/ 


You now see a different disassembly. The contents of 
memory have not changed. ZBUG has, however, inter- 
preted them differently. 


For example, assume $A1C2 contains a $54. This is the 
opcode for the LSRB mnemonic. Therefore, ZBUG dis- 
assembles $54 into LSRB. 


To see the program correctly, you must be sure you are 


beginning at the correct byte. Sometimes, several bytes 


will contain the symbol “??”. This means ZBUG can’t 
figure out which instruction is in that byte and is possibly 
disassembling from the wrong point. The only way of 
knowing you're on the right byte is to know where the 
program starts. 


Changing Memory 


As you look at the contents of memory addresses, notice 
that the cursor is to the right. This allows you to change 
the contents of that address. After typing the new con- 
tents, press or CG); the change will be made. 


To show how to change memory, we’ll open an address 
in video memory. Get into the byte mode and open 
Address $015A by typing: 


BREAK) 8 
@1SA/ 


Note that the cursor is to the right. To put a 1 in that 
address, type: 


1 (ENTER 


VY 


If you want to change the contents of more than one 
address, type: 


@15A/ 
Then type: 
DD G) 


This changes the contents to DD and lets you change 
the next address. (Press the (4) to see that the change 
has been made.) 


The size of the changes you make depends on the ex- 
amination mode you are in. In the byte mode, you will 
change one byte only and can type one or two digits. 


In the word mode, you will change one word at a time. 
Any 1-, 2-, 3-, or 4-digit number you type will be the new 
value of the word. 


lf you type a hexadecimal number that is also the name 
of a 6809 registers (A,B,D,CC,DP,X,Y,U,S,PC), ZBUG 
assumes it’s a register and gives you an “EXPRESSION 
ERROR.” To avoid this confusion, include a leading zero 
(0A,0B, etc.) 


To change memory in the ASCII mode, use an apos- 
trophe before the new letter. For example, here’s how to 
write the letter C in memory at Address $015A. To get 
into the ASCII examination mode, type: 


A 

To open Address $015A,type: 
@15A/ 

To change its contents to a C, type: 
ae QD 


Pressing the Cf) will assure you that the address con- 
tains the letter C. 
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lf you are in mnemonic mode, you must change one to 
five bytes of memory depending on the length of the 
opcode. Changing memory is complex in mnemonic 
mode because you must type the opcodes rather than 
the mnemonic. 


For example, get into the mnemonic mode and open 
Address $015A. Type: 


M (ENTER 
@1SA/ 


To change this instruction, type: 
86 (ENTER 


Now Address $015A contains the opcode for the LDA 
mnemonic. Open location 015B: 


015B/ 
and insert $06, the operand: 
@G (ENTER 


Upon examining Address $015A again, you'll see it now 
contains an LDA #6 instruction. 


Exploring the 
Computer’s Memory 


You are now invited to examine each section of memory 
using ZBUG commands to change examination modes. 
Use the Memory Map in Reference J. 


Don’t hesitate to try commands or change memory. You 
can restore anything you alter simply by removing the 
diskette and turning the computer off and then on again. 
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Chapter 6/ Editing the Program 
Editor Commands 


The editor has many commands to help you edit your 
source program. Chapter 2 shows how to enter a source 
program. This chapter shows how to edit it. 


To use the edit commands you must return to the editor 
from ZBUG: 


EDTASM: From EDTASM ZBUG, return to the edi- 
tor by typing E 


EDTASMOV: From Stand-Alone ZBUG, return to 
the DOS menu by typing K (ENTER). Then, execute 
the EDTASMOV program. 


The screen now shows the editors * prompt. While in 
the editor, you can return to the « prompt at any time by 
pressing (BREAK). 


This chapter uses SAMPLE/ASM from Chapter 2 as an 
example. To load SAMPLE/ASM into the editor, type: 


L SAMPLE/ASM (ENTER 


c™ 


Print Command 
Prange 


To print a line of the program on the screen, type: 
P1ia@ 

To print more than one line, type: 
P1@@:139@ 


You will often refer to the first line, last line, and current 
line (the last line you printed or inserted). To make this 
easier, you can refer to each with a single character: 


# first line 

* last line 

* current line (the last line you printed or 
inserted.) 


To print the current line, type: 
P. (ENTER 


on 


To print the entire text of the sample program, type: 
P#:* (ENTER 
This is the same as P050:200 (ENTER). 


The colon separates the beginning and ending lines in a 
range of lines. Another way to specify a range of lines is 
with !. Type: 

P#!3 (ENTER 


and five lines of your program, beginning with the first 
one, are printed on the screen. 


To stop the listing while it is scrolling, quickly type: 
SHIFT) @ 
To continue, press any key. 


Printer Commands 
Hrange 
Trange 


If you have a printer, you can print your program with the 
H and T commands. The H command prints the editor- 
supplied line numbers. The T command does not. 


To print every line of the edit buffer to the printer, type: 
H#:# 

You are prompted with: 
PRINTER READY 

Respond with when ready. 


The next example prints six lines, beginning with line 
100, but without the editor-supplied line numbers. Type: 


TI@@!6 
Edit Command 
Eline 


You can edit lines in the same way you edit Extended 
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COLOR BASIC lines. For example, to edit line 100, type: 
E1idd 


The new line 100 is displayed below the old line 100 and 
is ready to be changed. 


Press the (SPACEBAR) to position the cursor just after 
START. Type this insert subcommand: 


IED (ENTER 
which inserts ED in the line. 
The edit subcommands are listed in Reference A. 


Delete Command 
Drange 


If you are using the sample program, be sure you have 
written it on disk before you experiment with this com- 
mand. Type: 


Dii@:i4@ (ENTER 
Lines 110 through 140 are gone. 


insert Command 
Iistartline, increment 


Type: 
1152 +2 (ENTER 


You may now insert lines (up to 127 characters long) 
beginning with line 152. Each line is incremented by two. 
(The editor does not allow you to accidently overwrite an 
existing line. When you get to line 160, it gives you an 
error message.) 


Press (BREAK) to return to the command level. Then type: 
1200 (ENTER 


This lets you begin inserting lines at the end of the pro- 
gram. Each line is incremented by two, the last incre- 
ment you used. 


Type: 
BREAK) I (ENTER 
The editor begins inserting at the current line. 


On startup, the editor sets the current line to 100 and the 
increment to 10. You may use any line numbers be- 
tween 0 and 63999. 
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Renumber Command 
Nstartline,increment 


Another command that helps with inserting lines be- 


tween the lines is N (for renumber). From the command 


level, type: 
N1i@@+5@ (ENTER 


The first line is now Line 100 and each line is in- 
cremented by 50. This allows much more room for in- 
serting between lines. 


Type: 
N (ENTER 
The current line is now the first line number. 


Renumber now so you will be ready for the next instruc- 
tion. Type: 


Ni@®+1@ (ENTER 


Replace Command 
Rstartline,increment 


The replace command is a variation of the insert com- 
mand. Type: 


R1@@+3 (ENTER 


You may now replace line 100 with a new line and begin 
inserting lines using an increment of three. 


Copy Command 


Cstartline,range,increment 


The copy command saves typing by duplicating any part 
of your program to another location in the program. 


To copy lines, type: 
C500 +100:150+10 (ENTER 


This copies lines 100 to 150 to a new location beginning 
at Line 500, with an increment of 10. An attempt to copy 
lines over each other will fail. 


ZBUG Command 


The EDTASM system contains a copy of the stand-alone 
ZBUG program. This allows you to enter ZBUG while 
your program is still in memory. 


EDTASMOV Users: You need to use the Stand- 
Alone ZBUG program, as shown in Chapter 2. 


To enter ZBUG, type: 
2 (ENTER 
The # prompt tells you that you are now in ZBUG. 


To re-enter the editor from ZBUG, type the ZBUG 
command: 


E (ENTER 


If you print your program, you'll see that entering and 
exiting ZBUG did not change it. 


BASIC Command 

To enter BASIC from the editor, type: 
0 

lf you want to enter DOS from the editor, type: 
K 


Entering DOS or BASIC empties your edit buffer. Re- 
entering the editor empties your BASIC buffer. 


Write Command 
WD filespec 


gaits command is the same one you used in Chapter 2 to 


write the source program to disk. It saves the program in 
a disk file named filespec. Filespec can be in one of 
these forms: 


filename/ext:drive 
filename.ext:drive 


The filename can be one to eight characters. It is 
required. 


The extension can be one to three characters. It is 
optional. If the extension is omitted, the editor assigns 
the file the extension /ASM. 


The drive can be a number from 0 to 4. It is also option- 
al. If the drive number is omitted, the editor uses the first 
available drive. 


Examples: 
WD TEST 

saves source file currently in memory as TEST/ASM. 
WO TESTS FRE 

saves the source file currently in memory as TEST/PR1. 
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Load Command 
LD filespec 
LDA filespec 


This command loads a source filespec from disk into the 
edit buffer. If the source filespec you specify does not 
have an extension, the editor uses /ASM. 


If you don’t specify the A option, the editor empties the 
edit buffer before loading the file. 


lf you specify the A option, the editor appends the file to 
the current contents of the edit buffer. 


Appending files can be useful for chaining long pro- 
grams. When the second file is loaded, simply renumber 
the file with the renumber command. 


Examples: 
LD SAMPLE:1 


empties the edit buffer, then loads a file named SAM- 
PLE/ASM from Drive 1. 


LDA SAMPLE/PRO 


loads a file named SAMPLE/PRO from the first available 
drive, then appends to the current contents of the edit 
buffer. 


The editor has several other commands. These are 
listed in Reference A. 


Hints on Writing Your Program 


@ Copy short programs from any legal source available 
to you. Then modify them one step at a time to learn 
how different commands and addressing modes work. 
Try to make the program relocatable by using in- 
dexed, relative, and indirect addressing (described in 
Section III). 


e Try to write a long program as a series of short 
routines that use the same symbols. They will be 
easier to understand and debug. They can later be 
combined into longer routines. 


Note: You can use the editor to edit your BASIC pro- 
grams, as well as assembly language programs. You 
might find this very useful since the EDTASM editor is 
much more powerful than the BASIC editor. You need 
to first save the BASIC program in ASCII format: 


SAVE filespec, A 
Then, load the program into the editor. 


Chapter 7/ Assembling the Program 
(Assembler Commands) 


To load the assembler program and assemble the 
source program into 6809 machine code, EDTASM (or 
EDTASMOV) has an “assembly command.” Depending 
on how you enter the command, the assembler: 


@ Shows an “assembly listing” giving information on 
how the assembler is assembling the program. 


@ Stores the assembled program in memory. 
@ Stores the assembled program on disk. 
@ Stores the assembled program on tape. 


This chapter shows the different ways you can control 
the assembly listing, the in-memory assembly, and the 
disk assembly. Knowing this will help you understand 


and debug a program. 
on™ g a prog 


The Assembly Command 


The command to assemble your source program into 
6809 machine code is: 


Assembling in memory: 
A /IM /switch2/switch3/.. . 


The /IM (in memory) switch is required. 


Assembling to disk: 
A filespec /switch1/switch2/.. . 


The assembled program is stored on disk as filespec. If 
filespec does not include an extension, the assembler 
uses /BIN. 


Assembling to tape: 


A filename /switch1/switch2/.. . 


a 
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The assembled program is stored on tape as filename. 
The switch options are as follows: 


/AO Absolute origin 

/IM Assemble into memory 

AP Assembler listing on the line printer 
/MO Manual origin 

/NL No listing 

/NO No object code in memory or disk 
/NS No symbol table in the listing 

/SR Single record 

/SS Short screen listing 

WE Wait on assembly errors 

IWS With symbols 


You may use any combination of the switch options. Be 
sure to include a blank space before the first switch. If 
you omit filespec, you must use the in-memory switch 
(/IM). 


Examples: 
A/IM/WE 


assembles the source program in memory (/IM) and 
stops at each error (/WE). 


Me TEST Yi 


assembles the source program and saves it on disk as 
TEST/BIN. The listing is printed on the printer (/LP). 
Note that there must be a space between the filespec 
and the switch. 


A TEST/PRO 


assembles the source program and saves it on disk as 
TEST/PRO. 
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$1200 


1205 22060 BEGIN 


22070 


00120 SCREEN 


00130 


00140 


BNE SCREEN 
1211 AD JF ABO 00150 WAIT 
JSR C$ABOO] 


22160 


$71 

oF FEFE 02189 
LSPFFES 

121D 021908 DONE 
. 

BAD OP200 


. The location in memory where the assembled code 


will be stored. In this example, the assembled code 
for LDA#$F9 will be stored at hexadecimal location 
#1200. | 


. The assembled code for the program line. $86F9 is 


the assembled code for LDA #$F9. 


3. The program line. 


4. The number of errors. If you have errors, you will 


want to assemble the program again with the /WE 
switch. 


. The symbols you used in your program and the 


memory locations they refer to. 


Figure 1. Assembly Display Listing 
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- Controlling the 
Assembly Listing 


The assembler normally displays an assembly listing 
similar to the one in Figure 7. You can alter this listing 


with one of these switches: 


lt then prompts you for different values. Check your 
printer manual for the appropriate parameters. If you 
want the value to remain the same, simply press (ENTER). 
For example: 

LINCNT=38 

PAGLEN=66 

PAGWID=8@ 

FLDFLG=0 


= ge eee aces the listin sets the number of lines to 58, the page length to 66, 
/NL No isting g and the page width to 80 columns. You can then assem- 
/LP Listing printed on the printer ble the program with the /LP switch: 

For example: ee nie 


A SAMPLE /NS 


and the assembler prints the listing on the line printer 
using the parameters just set. 


assembles SAMPLE and shows a listing without the 


symbol table. 


lf you are printing the listing on the printer, you might 
want to set different parameters. You can do this with 


In-Memory Assembly 
The /IM Switch 


the editor's “set line printer parameters” command: 


To use this command, type (at the * prompt): 


S (ENTER 


The /IM switch causes the program to be assembled in 
memory, not on disk or tape. This is a good way to find 
errors in a program. 


The editor shows you the current values for: 


@ LINCNT — the number of lines printed on each page. 


©) (‘line count”) 


Where in memory? This depends on whether you use 
the /IM switch alone or accompany it with an ORG in- 
struction, an /AO switch, or an /MO switch. 


@ PAGLEN — the number of lines on a page. (“page 


length”) 


e PAGWID — the number of columns on a page. (“page 


width”) 


e FLDFLG — the “fold flag” (This flag should contain 1 
if your printer does not “wrap around.” Otherwise, the 


flag should contain 0.) 


EDTASMOV PROGRAM 


EDIT BUFFER 
MACRO TABLE 
SYMBOL TABLE 

ASSEMBLED PROGRAM 

STARTS HERE 


TOP OF RAM 


Using the /IM Switch Alone 


This is the most efficient use of memory. The assembler 
stores your program at the first available address after 
the EDTASM (or EDTASMOV) program, the edit buffer, 
and the symbol table: 


EDTASM PROGRAM 


$36D6 $4A2E 


EDIT BUFFER 
MACRO TABLE 
SYMBOL TABLE 

ASSEMBLED PROGRAM 

STARTS HERE 


$3FFF (16K) 


$7FFF (32K) $7FFF (32K) 


TOP OF RAM 


Figure 2. In-Memory Assembly 
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The EDTASM program ends at Address $4A2D. The 
EDTASMOV program ends at $36D5. 


The edit buffer contains the source program. It begins at 
Address $4A2E or $36D6 and varies in size depending 
on your program's length. 


The macro table references all the macro symbols in 
your program and their corresponding values. (Macros 
are described in Chapter 12.) Its size varies depending 
on how many macros your program contains. 


The symbol table references all your program’s symbols 
and their corresponding values. Its size varies depend- 
ing on how many symbols your program contains. 


Example: 


Load the SAMPLE/ASM back into the edit buffer. At the * 
prompt, type: 
L SAMPLE/ASM 
Delete the ORG line. At the * prompt, type: 
D3@ 
Then assemble the program in memory by typing: 
A/IM 


(If you want another look, type A/IM again. You can 
pause the display by pressing (@) and continue 
by pressing any key.) 


Since this sample program uses START to label the be- 
ginning of the program, you can find its originating 
address from the assembler listing. If you are using 
EDTASM, it should begin at Address $4B1E. If you are 
using EDTASMOV, it should begin at $37C6. 


EDTASMOV PROGRAM 


$36D6 
EDIT BUFFER 

MACRO TABLE 

SYMBOL TABLE 


$3800 


ASSEMBLED PROGRAM 
STARTS HERE 


$3FFF (16K) 


TOP OF RAM $7FFF(32K) 


Using ORG with /IM Uo 
for Origination Offset 


If you have an ORG instruction in your program and do 
not use the AO switch, the assembler stores your pro- 
gram at: 


the first available address + the value of ORG 
Example: 
Insert this line at the beginning of the sample program: 
EDTASM Systems: 


OOS ORG $6800 
EDTASMOV Systems: 
OO30 ORG $3800 


Then, at the * prompt, type: 


A/IM (ENTER 


The START address is now the first available address + 
$6000 or $3800. This means that if you have less than 
32K (with EDTASM) or less than 16K (with EDTAS- 
MOV), the program extends past the top of RAM and 
you will get a BAD MEMORY error. 


Using IM with /AO for Absolute Origir_) 


The AO switch causes the assembler to store your pro- 
gram “absolutely” at the address specified by ORG. 


With the ORG instruction inserted, type (at the * prompt): 
A/IM/AOQ (ENTER 
Your program now starts at address $6000 or $3800: 


EDTASM PROGRAM 


$4A2E 
EDIT BUFFER 

MACRO TABLE 

SYMBOL TABLE 


$6000 
ASSEMBLED PROGRAM 
STARTS HERE 


TOP OF RAM $7FFF (32k) 


Figure 3. /AO In-Memory Assembly. 
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| As you can see, the AO switch set the location of the 
assembled program only. It did not set the location of the 
edit buffer or the symbol table. 


lf your ORG instruction does not allow enough memory 
for your program, you will get a BAD MEMORY error. 
The assembler cannot store your program beyond the 
top of RAM. 


Using /MO with /IM 
for Manual Origin 


The /MO switch causes your program to be assembled 
at the address set by USRORG (plus the value set in 
your ORG instruction, if you use one). To set USRORG, 
use the editor’s “origin” command. 


Before setting USRORG, remove the ORG instruction 
from your program. Then, at the * prompt, type: 


QO (ENTER 
The editor shows you the current values for: 
e FIRST — the first hexadecimal address available 


a 


EDTASMOV PROGRAM 
$36D6 
EDIT BUFFER 
MACRO TABLE 
SYMBOL TABLE 
$3800 


ASSEMBLED PROGRAM 
STARTS HERE 


$3FFF (16K) 


TOP OF RAM $7FFF(32kK) 


Le ee 


@ LAST — the last hexadecimal address available 


e USRORG — the current hexadecimal value of 
USRORG. (On startup, USRORG is 
set to the top of RAM.) 


It then prompts you for a new value for USRORG. If you 
want USRORG to remain the same, press (ENTER). 


If you want to enter a new value, it must be between the 
FIRST address and LAST address. Otherwise, you will 
get a BAD MEMORY error. 


EDTASM Systems: Set USRORG to $6050: 
USRORG=685¢0 

EDTASMOV Systems: Set USRORG to $3800: 
USRORG=3800 


After setting USRORG, you can assemble the program 
at the USRORG address. Type: 


A/IM/MO (ENTER 


Your assembled program now starts at Address $6050 
or $3800: 


EDTASM PROGRAM 

$4A2E 
EDIT BUFFER 

MACRO TABLE 

SYMBOL TABLE 


$6050 


ASSEMBLED PROGRAM 
STARTS HERE 


$7FFF (32K) 
TOP OF RAM 


Figure 4. /MO In-Memory Assembly. 


7 / ASSEMBLING THE PROGRAM 


Disk Assembly 


When you specify a filespec in the assembler command, 
the assembler saves the assembled program on disk. 
You can then load the program from one of these 
systems: 


e DOS (to run as a stand-alone program) 
@ ZBUG (to debug with the stand-alone ZBUG program) 
@ BASIC (to call from a BASIC program) 


The program originates at the address you specify in the 
ORG instruction. 


What address you should use as the originating address 
depends upon which of the three systems you will be 
loading it into. 


Assembling for DOS 


Reference J shows the memory map that is in effect 
when DOS is loaded. As you can see, DOS consumes 
all the memory up to Address $1200. This means you 
must originate the program after $1200 or you will over- 
write DOS. 


In the sample program, reinsert the ORG $1200 
instruction: 


50 ORG #1200 
and assemble it to disk by typing: 
& SAMPLE /SR (ENTER 


Note the /SR switch. You must use /SR when assem- 
bling to disk a program that you plan to load back into 
DOS. This puts the program in the format expected by 
DOS. 


The assembler saves SAMPLE/BIN to disk with a start- 
ing address of $1200. You can now load and execute 
SAMPLE/BIN from the DOS menu. 


Assembling for Stand-Alone 
ZBUG (EDTASMOV Users) 


If you plan to use the stand-alone ZBUG for debugging 
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your program, you need to save the program on disk so 
that you can load it into ZBUG. 


Reference J also shows the memory map that is in effect 
when ZBUG is loaded. As you can see, you must use an 
originating address of at least $3800 or you will overwrite 
ZBUG. Change the ORG instruction to: 


2 @ ORG $3800 


So that you can test this from ZBUG, without the pro- 
gram returning to BASIC, you need to change the ending 
of it. First, delete the CLR instruction in Line 170: 


Di7@ (ENTER 
Then, change the JMP instruction in Line 180 to this: 
182 SWI 


After making the changes to the program, assemble it to 
disk by typing: 


A SAMPLE/BUG /WS (ENTER 


The assembler saves SAMPLE/BUG on disk with a start- 
ing address of $3800. The /WS switch causes the 
assembler to save the symbol table also. 


Y 


Hints On Assembly 
e Use a symbol to label the beginning of your program. 


@ When doing an in-memory assembly on a program 
with an ORG instruction, you may want to use the /AO 
switch. Otherwise, the assembler will not use ORG as 
the program’s originating address. It will use it to 
offset (add: to) the loading address. 


® The /WE switch is an excellent debugging tool. Use it 
to detect assembly errors before debugging the 
program. 


@ If you would like to examine the edit buffer and symbol 
table after an in-memory assembly, use ZBUG to ex- 
amine the appropriate memory locations. 
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Chapter 8/ Debugging the Program 
(ZBUG Commands — Part Il) 


ZBUG has some powerful tools for a trial run of your 
assembled program. You can use them to look at each 
register, every flag, and every memory address during 
every step of running the program. 


Before reading any further, you might want to review the 
ZBUG commands you learned in Chapter 5. We will be 
using these commands here. 


Preparing the 
Program for ZBUG 


( ‘In this chapter, we'll use the sample program from 


Chapter 2 to show how to test a program. How you load 
the program into ZBUG depends on whether you are us- 
ing EDTASM’s ZBUG program or the stand-alone ZBUG 
program. 


EDTASM ZBUG: 


If you are using EDTASM, you can use EDTASM’s 
ZBUG program. 


1. Load SAMPLE/ASM into EDTASM (if it’s not already 
loaded). 


2. So that your program will be in the same area of 
memory as ours, change the ORG instruction to: 


2@ ORG $5800 


3. So that you can test the program properly from 
ZBUG (without the program returning to BASIC), 
you need to change the program’s ending. First, de- 
lete the CLR instruction in Line 170: 


D17@ (ENTER 


Then, change the JMP instruction in Line 180 to 
this: 


18d Sl I 
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4. Assemble the program in memory using the /IM and 
/AO switches. At the * prompt, type: 


A/IM/AO (ENTER 
5. Enter ZBUG. At the * prompt, type: 
2 (ENTER 


When the # prompt appears, you’re in ZBUG and 
can test the sample program. 


Stand-Alone ZBUG: 


lf you are using EDTASMOV, you should use the Stand- 
Alone ZBUG. 


1. Assemble SAMPLE/BUG to disk as instructed in the 
last chapter (“Assembling for Stand-Alone ZBUG’”). 


2. Return to DOS and execute the stand-alone ZBUG 
program: 


EXECUTE A PROGRAM 
PROGRAM NAME [C2BUG J/BIN 


ZBUG loads and displays its # prompt. 


3. Load SAMPLE/BUG, along with its symbol table, 
into ZBUG. Type: 


LDS SAMPLE/BUG (ENTER 


When the # prompt appears, you're ready to test the 
sample program with ZBUG. 


Display Modes 


In Chapter 5, we discussed four examination modes. 
ZBUG also has three display modes. 


We'll examine each of these display modes from the 
mnemonic examination mode. If you’re not in this mode, 
type M (ENTER) to get into it. 
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Numeric Mode 
Type: 
N 


and examine the memory addresses that contain your 
program: $5800-$5817 for EDTASM’s ZBUG or $3800- 
$3817 for Stand-Alone ZBUG. 


In the numeric mode, you do not see any of the symbols 
in your program (BEGIN, START, SCREEN, WAIT, and 
DONE). All you see are numbers. For example, with 
EDTASM’s.ZBUG, Address $580F shows the instruction 
BNE 580A rather than BNE SCREEN. 


Symbolic Mode 
From the command level, type: 
S 


and examine your program again. ZBUG displays your 
entire program in terms of its symbols (BEGIN, START, 
SCREEN, WAIT, and DONE). Examine the memory 
address containing the BNE SCREEN instruction and 


type: 
: 


The semicolon causes ZBUG to display the operand 
(SCREEN) as a number (580A or 380A). 


Half-Symbolic Mode 


From the command level, type: 
H (ENTER 


and examine the program. Now all the memory addres- 
ses (on the left) are shown as symbols, but the operands 
(on the right) are shown as numbers. 


Using Symbols to 
Examine Memory 


Since ZBUG understands symbols, you can use them in 
your commands. For example, with EDTASM’s ZBUG, 
both these commands open the same memory address 
no matter which display mode you are in: 


BEGIN/ 
~800/ 
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Both of these commands get ZBUG to display your en-WI 
tire program: 


T BEGIN DONE 
T S8@@ 3817 


You can print this same listing on your printer by substi- 
tuting TH for T. 


Executing the Program 


You can run your program from ZBUG using the G (Go) 
command followed by the program’s start address: 


EDTASM ZBUG: Type either of the following: 


GBEGIN (ENTER 
GS8@@ (ENTER 


Stand-Alone ZBUG: Type either of the following: 


GBEGIN (ENTER 
G3800 (ENTER 


The program executes, filling all of your screen with a 
pattern made up of F9 graphics characters. If you don't 
get this pattern, the program probably has a “bug.” The 
rest of the chapter discusses program bugs. 


After executing the program, ZBUG displays 8 BRK @ 
5817, 8 BRK @ 3817, or 8 BRK @ DONE. This tells you 
the program stopped executing at the SWI instruction lo- 
cated at Address DONE. ZBUG interprets your closing 
SWI instruction as the eighth or final “breakpoint” (dis- 
cussed. below). 


Setting Breakpoints 


lf your program doesn’t work properly, you might find it 
easier to debug it if you break it up into small units and 
run each unit separately. From the command level, type 
X followed by the address where you want execution to 
break. 


We'll set a breakpoint at the first address that contains 
the symbol SCREEN: $580A for EDTASM’s ZBUG or 
380A for Stand-Alone ZBUG. 


EDTASM ZBUG: Type either of the following: 


XSCREEN (ENTER 
XO8@A (ENTER 


SoC TSE 


Stand-Alone ZBUG: Type either of the following: 


XSCREEN (ENTER 
X38@A (ENTER 


Now type GBEGIN to execute the program. Each 
time execution breaks, type: 


C (ENTER 


to continue. A graphics character appears on the screen 
each time ZBUG executes the SCREEN loop. (The char- 
acters appear to be in different positions because of 
scrolling. You will not see the first 32 characters because 
they scroll off the screen.) 


Type: 
D (ENTER) 


to display all the breakpoints you have set. (You may set 
up to eight breakpoints numbered 0 through 7.) 


Type: 
Cid 


and the tenth time ZBUG encounters that breakpoint, it 
halts execution. 


Type: 
Y (ENTER 


This is the command to “yank” (delete) all breakpoints. 
You can also delete a specific breakpoint. For example: 


¥@ (ENTER 
This deletes the first breakpoint (Breakpoint 0). 


You may not set a breakpoint in a ROM routine. If you 
set a breakpoint at the point where you are calling a 
ROM routine, the C command will not let you continue. 


Examining Registers. 
and Flags 


Type: 
fF (ENTER 


What you see are the contents of every register during 
this stage of program execution. (See Chapter 10 for 
definition of all the 6809 registers and flags.) 


Look at Register CC (the Condition Code). Notice the 
letters to the right of it. These are the flags that are set in 
Register CC. The E, for example, means the E flag is 
set. 


Type: 


and ZBUG displays only the contents of Register X. You 
can change this in the same way you change the con- 
tents of memory. Type: 

@ (ENTER 


and the Register X now contains a zero. 


Stepping Through 
the Program 


Type: 
BEGIN» Note the comma! 


LDA #$F9 is the next instruction to be executed. The 
first instruction, JMP START, has just been executed. To 


see the next instruction, type: 
: Simply a comma 


Now, LDA #$F9 has been executed and LDX #$500 is 
the next. Type: 


FR (ENTER 


and you'll see this instruction has loaded Register A with 
$F9. 


Use the comma and R command to continue single- 
stepping through the program examining the registers at 
will. If you manage to reach the JSR [$A000] instruction, 
ZBUG prints: 


CAN‘’T CONTINUE 


ZBUG cannot single-step through a ROM routine or 
through some of the DOS routines. 


Transferring a Block 
of Memory 
EDTASM ZBUG: Type: 
U S880 3000 & 
Stand-Alone ZBUG: Type: 
U 3882 383508 6 


Now the first six bytes of your program have been 
copied to memory addresses beginning at 5000 or 3850. 
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Saving Memory to Disk 


To save a block of memory from ZBUG, including the 
symbol table, type: 


EDTASM ZBUG: PS TEST/BUG 58020 
“817 3800 (ENTER 


Stand-Alone ZBUG: PS TEST/BUG 3802 
3817 380@ (ENTER 


This saves your program on disk, beginning at Address 
5800 (or 3800) and ending at Address 5817 (or 3817). 
The last address is where your program begins execu- 
tion when you load it back into memory. In this case, this 
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address is the same as the start address. 


To load TEST/BUG and its symbol table back into 
ZBUG, type: 


LDS TEST/BUG 
Hints on Debugging 


@ Don't expect your first program to work the first time. 
Have patience. Most new programs have bugs. De- 
bugging is a fact of life for all programmers, not just 
beginners. 


e@ Be sure to make a copy of what you have in the edit 
buffer before executing the program. The edit buffer is 
not protected from machine language programs. 
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Chapter 9/ Using the ZBUG Calculator 
(ZBUG Commands — Part Ill) 


ZBUG has a built-in calculator that performs arithmetic, 
relational, and logical operations. Also, it lets you use 
three different numbering systems, ASCII characters, 
and symbols. 


This chapter contains many examples of how to use the 
calculator. Some of these examples use the same 
assembled program that we used in the last chapter. 


Stand-Alone ZBUG: Some of the memory 
addresses we use in the examples are too high for 
your system. Subtract $1000 from all the hexadeci- 
mal addresses and 4096 from all the decimal 
numbers. 


Numbering System Modes 


ZBUG recognizes numbers in three numbering systems: 
hexadecimal (Base 16), decimal (Base 10), and octal 
(Base 8). 


Output Mode 


The output mode determines which numbering system 
ZBUG uses to output (display) numbers. From the ZBUG 
command level, type: 


012 (ENTER 


Examine memory. The T at the end of each number 
stands for Base 10. Type: 


O8 (ENTER 


Examine memory. The Q at the end of each number 
stands for Base 8. Type: 


016 (ENTER 
You’re now back in Base 16, the default output mode. 
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Input Mode 


You can change input modes in the same way you 
change output modes. For example, type: 


1i@ (ENTER 
Now, ZBUG interprets any number you input as a Base 
10 number. For example, if you are in this mode and 
type: 

T 49152 49162 (ENTER 
ZSBUG shows you memory addresses 49152 (Base 10) 
through 49162 (Base 10). Note that what is printed on 


the screen is determined by the output mode, not the 
input mode. 


You can use these special characters to “override” your 
input mode: 


Table 1. Special Input Mode Characters 


For example, while still in the 110 mode, type: 
T 49152 %C@1@ (ENTER 


The “$” overrides the 110 mode. ZBUG, therefore, inter- 
prets C010 as a hexadecimal number. As another exam- 
ple, get into the 116 mode and type: 


T 49152T C@1i®@ (ENTER 


Here, the “T” overrides the 116 mode. ZBUG interprets 
49152 as decimal. 


9 /USING THE ZBUG CALCULATOR 


Operations 


ZBUG performs many kinds of operations for you. For 
example, type: 


C8O8+25T/ 


and ZBUG goes to memory address C019 (Base 16), 
the sum of C000 (Base 16) and 25 (Base 10). If you 
simply want ZBUG to print the results of this calculation, 


type: 
COOB+25T= 


On the following pages, we'll use the terms “operands, ” 
“operators,” and “operation.” An operation is any cal- 
culation you want ZBUG to solve. In this operation: 


i i ake i 
“4” and “2” are the operands. “+”" is the operator. 


Operands 

You may use any of these as operands:. 
1. ASCII characters 

2. Symbols 


3. Numbers (in either Base 8, 10, or 16) — Please note 
that ZBUG recognizes integers (whole numbers) only 


Examples (Get into the 016 mode): 
‘he 

prints 41, the ASCII hexadecimal code for “A”. 
START= 


prints the START address of the sample program. (It will 
print UNDEFINDED SYMBOL if you don’t have the sam- 
ple program assembled in memory.) 


15Q= 
prints the hexadecimal equivalent of octal 15. 
lf you want your results printed in a different numbering 


system, use a different output mode. For example, get ww 
into the O10 mode and try the above examples again. 


Operators 


You may use arithmetic, relational, or logical operators. 
(Get into the O16 mode for the following examples.) 


Arithmetic Operators 


Addition - 
Subtraction _ 
Multiplication * 
Division DIV. 
Modulus .MOD. 
Positive oe 
Negative on 
Examples: 


DONE-START= 


prints the length of the sample program (not including 
the SWI at the end). 


9,DIV,2= 
prints 4. (ZBUG can divide integers only.) 
9,MO0D,2= = 
prints 1, the remainder of 9 divided by 2. J 
1-2= 


prints OFFFF,65535T, or 177777Q, depending on which 
output mode you are in. ZBUG does not use negative 
numbers. Instead, it uses a “number circle” which oper- 
ates on modulus 10000 (hexadecimal): 


FFFF _ 1 


FFFD 


minus | 


equals a 
Pre 1 


Figure 5. Number Circle Illustration of Memory. 
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‘To understand this number circle, you can use the clock 
as an analogy. A clock operates on modulus 12 in the 
same way the ZBUG operates on modulus 10000. 
Therefore, on a clock, 1:00 minus 2 equals 11:00: 


0 


11:00 1:00 


9:00 3:00 


| minus | 


equals 9 


11:00 1:00 


Figure 6. Number Circle Illustration of Clock. 


Relational Operators 


Equal to »-EQU, 
Not Equal to »NEQ, 
These operators determine whether a relationship is true 
or false. 
Examples: 
X+-EQU,5= 


prints OFFFF, since the relationship is true. (ZBUG prints 
65535T in the O10 mode or 177777Q in the O8 mode.) 


o»-NEQ,5= 


prints 0, since the relationship is false. 


Logical Operators 


Shift 4 
LogicalAND »AND, 
InclusiveOR »OR, 
ExclusiveOR »XOR., 
Complement »NOT. 


Logical operators perform bit manipulation on bi- 
nary numbers. To understand bit manipulation, see the 


6809 assembly language book we referred to in the 
introduction. 


Examples: 
1o<2= 


shifts 10 two bits to the left to equal 40. The 6809 SL 
instruction also performs this operation. 


104-25 


shifts 10 two bits to the right to equal 4. The 6809 ASR 
instruction also performs this operation. 


6.4OR,5= 


prints 3, the exclusive or of 6 and 5. The 6809 EOR 
instruction also performs this operation. 


Complex Operations 


ZBUG calculates complex operations in this order: 


+ »DIV, »*MOD, 
»~AND, 

»OR, »>XOR 

+ a 

»+EQU, »+NEQ, 


You may use parentheses to change this order. 


Examples: 
4+4,DIV,2= 

The division is performed first. 
(4+4),DIV.,2= 

The addition is performed first. 
4*#4.,D1IV.,4= 


The multiplication is performed first. 
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SECTION Ill 


ASSEMBLY LANGUAGE 
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This section gives details on the Disk 
EDTASM assembly language. It does not ex- 
plain the 6809 mnemonics, however, since 
there are many books available on the 6809. 


To learn about 6809 mnemonics, read one 
of the books listed in “About This Manual.” If 
you need more technical information on the 
6809, read: 

MC6809-MC6809E 

8-Bit Microprocessor Programming 

Manual 

Motorola, Inc. 


Chapter 10/ 
Writing the Program 


Chapter 3 gives a general description of assembly lan- 
guage instructions. This chapter describes them in 
detail. 


The 6809 Registers 


The 6809 contains nine temporary storage areas that 
you may use in your program: 


Accumulator 
Accumulator 
Accumulator 
(a combination 


1 byte 
1 byte 
2 bytes 


of A and B) 
1 byte Direct Page 
1 byte Condition Code 
2 bytes Program Counter 
2 bytes Index 
2 bytes Index 
2 bytes Stack Pointer 


2 bytes Stack Pointer 


Table 2. 6809 Registers 


Registers A and B can manipulate data and perform 
arithmetic calculations. They each hold one byte of data. 
If you like, you can address them as D, a single 2-byte 
register. 


Register DP is for direct addressing. It stores the most 
significant byte of an address. This lets the processor 
directly access an address with the single, least signifi- 
cant byte. 


Registers X and Y can each hold two bytes of data. 
They are mainly for indexed addressing. 


Register PC stores the address of the next instruction to 
be executed. 


c 
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Registers U and S each hold a 2-byte address that 
points to an entire “stack” of memory. This address is 
the top of the stack + 1. For example, if Register U 
contains 0155, the stack begins with Address 154 and 
continues downwards. 


The processor automatically points Register S to a stack 
of memory during subroutine calls and interrupts. Regis- 
ter U is solely for your own use. You can access either 
stack with the PSH and PUL mnemonics or with indexed 
addressing. 


Register CC is for testing conditions and setting inter- 
rupts. It consists of eight “flags.” Many mnemonics “set” 
or ‘clear’ one or more of these flags. Others test to see 
if a certain flag is set or clear. 


This is the meaning of each flag, if set: 


C (Carry), Bit 0 — an 8-bit arithmetic operation 
Caused a carry or borrow from the most significant 
bit. 

V (Overflow), Bit 1 — an arithmetic operation 
Caused a signed overflow. 


Z (Zero), Bit 2 — the result of the previous opera- 
tion is zero. 


N (Negative), Bit 3 — the result of the previous 
operation is a negative number. 


| (Interrupt Request Mask), Bit 4 — any requests 
for interrupts are disabled. 


H (Half Carry), Bit 5 — an 8-bit addition operation 
Caused a carry from Bit 3. 


F (Fast Interrupt Request Mask), Bit 6 — any re- 
quests for fast interrupts are disabled. 


E (Entire Flag), Bit 7 — all the registers were 
stacked during the last interrupt stacking operation. 
(If not set, only Registers PC and CC were stacked.) 
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2 __.____ aaa, 


assembler translates them into opcodes and stores them “7 


Assembly Language Fields 


-You may use four fields in an assembly language in- 
struction: label, command, operand, comment. In this 
instruction: 


START LDA #$F9 GETS CHAR 


START is the label. LDA is the command. #$F9+1 is 
the operand. GETS CHAR is the comment. 


The comment is solely for your convenience. The 
assembler ignores it. 


The Label 


You can use a symbol in the label field to define a mem- 
ory address or data. The above instruction uses START 
to define its memory address. 


Once the address is defined, you can use START as an 
operand in other instructions. For example: 


BNE START 
branches to the memory address defined by START. 


The assembler stores all the symbols, with the addres- 
ses or data they define, in a “symbol table,” rather than 
as part of the “executable program.” The symbol can be 
up to six characters. 


The Command 
The command can be either a pseudo op or a mnemonic. 


Pseudo ops are commands to the assembler. The 
assembler does not translate them into opcodes and 
does not store them with the executable program. For 
example: 


NAME EQU $43 


defines the symbol NAME as $43. The assembler stores 


this in its symbol table. 
ORG $3A0SO 


tells the assembler to begin the executable program at 
Address $3000. 


SYMBOL FCB $6 


stores 6 in the current memory address and labels this 
address SYMBOL. The assembler stores this informa- 
tion in its symbol table. 


Mnemonics are commands to the processor. The 
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with the executable program. For example: 
CLRA 


tells the processor to clear Register A. The assembler 
assembles this into opcode number $4F and stores it 
with the executable program. 


The next chapter shows how to use pseudo ops. Refer- 
ence L lists the 6809 mnemonics. 


The Operand 


The operand is either a memory address or data. For 
example: 


LDD #3000+COUNT 


loads Register D with $3000 plus the value of COUNT. 
The operand, #$3000 + COUNT, specifies a data 
constant. 


The assembler stores the operand with its opcode. Both 
are stored with the executable program. 


Operators 


The plus sign (+) in the above operand (#3000 + 
COUNT) is called an operator. 


You can use any of the operators described in Chapter 
9, “Using the ZBUG Calculator,” as part of the operand. 


Addressing Modes 


The above example uses the # sign to tell the assem- 
bler and the processor that $3000 is data. When you 
omit the # sign, they interpret $3000 in a different 
“addressing mode.” 


Example: 
LDD $3000 


tells the assembler and processor that $3000 is an 
address. The processor loads D with the data contained 
in Address $3000 and $3001. 


Each of the 6809 mnemonics lets you use one to six 
addressing modes. These addressing modes tell you: 


e |f the processor requires an operand to execute 
the opcode 


@ How the assembler and processor will interpret 
the operand 


/. Inherent Addressing 


There is no operand, since the instruction doesn't re- 
quire one. For example: 


SWI 
interrupts software. No operand is required. 
CLRA 


clears Register A. Again, no operand is required. Regis- 
ter A is part of the instruction. 


2. Immediate Addressing 


The operand is data. You must use the # sign to specify 
this mode. For example: 
ADDA #$30 


adds the value $30 to the contents of Register A. 


DATA EQU $8004 
LDX #DATA 


loads the value $8004 into Register X. 
CMPX #$12394 


compares the contents of Register X with the value 
1234. 


3. Extended Addressing 


The operand is an address. This is the default mode of 
all operands. 


(Exception: If the first byte of the operand is identical to 
the direct page, which is 00 on startup, it is directly 
addressed. This is an automatic function of the assem- 
bler and the processor. You need not be concerned with 
it if you’re a beginner.) 


For example: 
JSR #$12394 
jumps to Address $1234. 
SPOT EQU Si2ue 
STA SPOT 


stores the contents of Register A in Address $1234. 


If the instruction calls for data, the operand contains the 
address where the data is stored. 


LDA $1234 


does not load Register A with $1234. The processor 
loads A with whatever data is in Address $1234. If $06 is 


on 


43 


RSE 


stored in Address $1234, Register A is loaded with $06. 


ADDA $1234 


adds whatever data is stored in Address $1234 to the 
contents of Register A. 


LDD $1234 


loads D, a 2-byte register, with the data stored in mem- 
ory addresses $1234 and $1235. 


You can use the > sign, which is the sign for extended 
addressing, to force this mode. (See “Direct Addressing.”) 


Extended Indirect Addressing. 


The operand is the address of an address. This is a 
variation of the extended addressing mode. The [ | 
signs specify it. (Use C4) to produce the [ sign 
and to produce the | sign.) 


In understanding this mode, think of a treasure hunt 
game. The first instruction is “Look in the clock.” The 
clock contains the second instruction, ‘Look in the 
refrigerator.” 


Examples: 
JSR C$1234] 


jumps to the address contained in Addresses $1234 and 
$1235. If $1234 contains $06 and $1235 contains $11, 
the effective address is $0611. The program jumps to 
$0611. 


SPOT EQU $1234 


STA Carers 


stores the contents of Register A in the address con- 
tained in Addresses $1234 and $1235. 


LDD C$1234] 


loads D with the data stored in the address that is stored 
in Addresses $1234 and $1235. 


This is a good mode of addressing to use when calling 
ROM routines. For example, the entry address of the 
POLCAT routine is contained in Address $A000. There- 
fore, you can call it with these instructions: 


POLCAT EQU $A000 
JSR CPOLCAT] 


lf a new version of ROM puts the entry point in a differ- 
ent address, your program still works without changes. 


4, Indexed Addressing 


The operand is an index register which points to an 
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address. The index register can be any of the 2-byte 
registers, including PC. You can augment it with: 


e Aconstant or register offset 
@ An auto-increment or auto-decrement of 1 or 2 
The comma (,) indicates indexed addressing. 
As an example, load X, a 2-byte register, with $1234: 
LDX #$1234 


You can now access Address $1234 through indexed 
addressing. This instruction: 


STA 
stores the contents of A in Address $1234 
STA 39K 


stores the contents of A in Address $1237, which is 
$1234 + 3. (The number 3 is a constant offset.) 


SYMBOL EQU $4 
STA SYMBOL +A 


stores the contents of A in Address $1238, which is 
$1234 + SYMBOL. (SYMBOL is a constant offset.) 


LDB #$5 
STA Bax 


stores the contents of A in Address $1239 which is 
$1234 + the contents of B. (B is a register offset. You 
can use either of the accumulator registers as a register 
Offset.) 


Vi 
$F 


STA 


This instruction does two tasks: (1) stores A’s contents in 
Address $1234 (the contents of X) and then (2) incre- 
ments X’s contents by one, so that X contains $1235. 


STA 


(1) stores A’s contents in Address $1235 (the current 
contents of X) and then (2) increments X’s contents by 
two to equal $1237. 


Ve 
+ At 


its 


STA 


(1) decrements the current contents of X by two to equal 
$1235 ($1237 — 2) and then (2) stores A’s contents in 
Address $1235. 


As we said above, you can use PC as an index register. 
In this form of addressing, called program counter rela- 
tive, the offset is interpreted differently. For example: 


SYMBOL FCB @ 
LDA SYMBOL +PCR 


vf 
$e sy 


ag 


While assembling the program, the assembler subtract 
the contents of Register PC from the offset: 


LDA SYMBOL-PC+PCR 


While running the program, the processor adds the con- 
tents of Register PC to the offset. This causes A to be 
loaded with SYMBOL. 


This seems to be the same as extended addressing. 
But, by using program counter relative adressing, you 
can relocate the program without having to reassemble 
it. 

Indexed Indirect Addressing. 


The operand is an index register which points to the 
address of an address. This is a variation of indexed 
addressing. 


For example, assume that : 
@ Register X contains $1234 
e Address $1234 contains $11 
@ Address $1235 contains $23 
e Address $1123 contains $64 
This instruction: 
LDA CsA] 


loads A with 64. (Register X points to the addresses ow 
the address. This address is storing 6, the required 
data.) 


——— 
5 


STA [+x 


stores the contents of A in Address $1123. (Register X 
points to the addresses, $1234 and $1235, of the effec- 
tive address, $1123.) 


5. Relative Addressing 


The assembler interprets the operand as a relative 
address. There is no sign to indicate this mode. The 
assembler automatically uses it for all branching 
instructions. 


For example, if this instruction is located at Address 


$0580: 
BRA $2585 


The assembler converts $0585 to a relative branch of 
+3 (0585-0582). 


This mode is invisible to you unless you get a BYTE 
OVERFLOW error, which we discuss below. Because 
the processor uses this mode, you can relocate your 


program in memory without changing any of the branch- 
ing instructions. 


The BYTE OVERFLOW error means that the relative 
branch is outside the range of -128 to +127. You must 
use a long branching instruction instead. For example: 


LBRA $OE00 
allows a relative branching range of —32768 to + 32767. 


6. Direct Addressing 


In this mode, the operand is half of an address. The 
other half of the address is in Register DP: 


DP REGISTER OPERAND 


ADDRESS | = 


(most significant | (least significant 


byte) byte) 


Figure 7. Direct Addressing 


The assembler and the processor use this mode auto- 
matically whenever they approach an operand whose 
first byte is what they assume to be a “direct page” (the 
contents of Register DP). Until you change the direct 


Mvage, the assembler and the processor assume it is 00. 


For example, both of these instructions: 


JSR $0015 
JSR $15 


cause a jump to Address $0015. In both cases, the 
assembler uses only 15 as the operand, not 00. When 
the processor executes them, it gets the 00 portion from 
Register DP and combines it with $15. (On startup, DP 
contains 0, as do all the other registers.) 


Because of direct addressing, all operands beginning 
with 00, the direct page, consume less room in memory 
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and run quicker. If most of your operands begin with 
$12, you might want to make $12 the direct page. 


To do this, you first need to tell the assembler what you 
are doing, by putting a SETDP pseudo-operation in your 
program: 


eR $12 


This tells the assembler to drop the $12 from all oper- 
ands that begin with $12. That is, the assembler assem- 
bles the operand “1234” as simply “34”. 


Then, you must load Register DP with $12. Since you 
can use LD only with the accumulator registers, you 
have to load DP in a round-about manner: 


LDB #$12 
THR B»DP 


Now the direct page is $12, rather than 00. The proces- 
sor executes all operands that begin with $12 (rather 
than 00) in an efficient, direct manner. 


The assembler uses direct addressing on all operands 
whose first byte is the same as the direct page. You can 
denote direct addressing with the < sign if you want to 
document or be sure that direct addressing is being 
used. 


For example, if the direct page is $12: 
JSR CS 


jumps to Address $1215. This instruction documents that 
the processor uses direct addressing. 


Similarly, you might want to use the > sign to force ex- 
tended addressing. For example: 


JSR 


jumps to Address $1215. The assembler and processor 
use both bytes of the operand. 


?$1iZ15 


To learn more about 6809 addressing modes, read one 
of the books listed at the beginning of this manual. 


DiASM 


CET 


Chapter 11/ 
Using Pseudo Ops 


As discussed earlier, pseudo ops direct the assembler. 
You can use them to: 


@ Control where the program is assembled 

@ Define symbols 

@ Insert data into the program 

@ Change the assembly listing 

@ Do a “conditional” assembly 

@ Include another source file in your program 


Pseudo ops are unique to the assembler you are using. 
Other 6809 assemblers may not recognize the Disk 
EDTASM pseudo ops. 


The Disk EDTASM pseudo ops make it easier for you to 
program. This chapter shows how to use pseudo ops. 


Controlling Where the 
Program is Assembled 


The Disk EDTASM has two pseudo ops that control 
where the program is assembled: 


@ ORG, sets the first location 
@ END, ends the assembly 


ORG 


ORG expression 


Tells the assembler to begin assembling the program at 
expression. Example: 


ORG $1800 


tells the assembler to start assembling the program at 
Address $1800. 


You can put more than one ORG command in a pro- 
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gram. When the assembler arrives at the new ORG, it 
begins assembling at the new expression. 


END 


END expression 


Tells the assembler to quit assembling the program. The 
expression option lets you store the program's start 
address. Use END as the last instruction in all your 
assembly language programs. 


Example: 
ORG $1890¢ 
DATA FCC ‘This is some data’ 


START LDA DATA 


END START 


The END pseudo op quits the assembly and stores the 
program’s entry address (the value of START) on disk. 
When you load the program, the processor knows to 
start executing at START (the LDA instruction) rather 
than at DATA (the FCC instruction). 


FCC is a pseudo op explained later in this chapter. 


Defining Symbols 


Symbols make it easy to write a program and also make 
the program easy to read and revise. The Disk EDTASM 
has two pseudo ops for defining symbols: 


@ EQU, for defining a constant value 
@ SET, for defining a variable value 
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EQU 


symbol EQU expression 
Equates symbol to expression. Examples: 


CHAR EQU Sr 
equates CHAR to $F9. 
SCREEN EQU $300 
LDX #SCREEN 
equates SCREEN to $500. The next instruction loads X 
with $500. 


EQU helps set the values of constants. You can use it 
anywhere in your program. 


SET 


symbol SET expression 


Sets symbol! equal to expression. You can use SET to 
reset the symbol elsewhere in the program. Example: 


SYMBOL SET a 


sets SYMBOL equal to 25. Later in the program, you can 
reset SYMBOL. 


SYMBOL co ae 
now SYMBOL equals 25+ COUNT. 


SYMBOL+COUNT 


Inserting Data into 
Your Program 


The Disk EDTASM has four pseudo ops that make it 
simple for you to reserve memory and insert data in your 
program: 


@ RMB, for reserving areas of memory for data 
e FCB, for inserting one byte of data in memory 
e FDB, for inserting two bytes of data in memory 
e@ FCC, for inserting a string of data in memory 


Remember that the processor cannot “execute” a block 
of data in your program. If you use these pseudo ops: 


@ Use them at the end of your program (just before the 
END instruction), or 

@ Precede them with an instruction that jumps or 
branches to the next “executable” instruction. 
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RMB ad 


symbol RMB expression 


Reserves expression bytes of memory for data. 
Example: 


BUFFER RMB 


reserves 256 bytes for data, starting at Address 
BUFFER. 


DATA RMB 6+SYMBOL 


reserves 6+SYMBOL bytes for data beginning at 
Address DATA. 
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FCB 


symbol FCB expression 


Stores a 1-byte expression in memory at the current 
address. The symbol is optional. 


Examples: 
DATA rie $33 
stores $33 in Address DATA. 
FACTOR FCB NUM/2 
LDA FACTOR 


ae 


WwW 


stores NUM/2 in Address FACTOR, then, loads NUM/2 
into Register A. 


FDB 


symbol FDB expression 


Stores a 2-byte expression in memory starting at the 
current address. The symbol is optional. Example: 


DATA FDB $3322 
stores $3322 in Address DATA and DATA + 1. 


FCC 


symbol FCC delimiter string delimiter 


Stores an ASCII string in memory, beginning at the cur- 
rent address. The symbol is optional. The delimiter can 
be any character. 


Examples: 
TREE ~ FAA, /THIS I5 A STRING/ 


stores the ASCII codes for THIS IS A STRING in mem- 
ory locations, beginning with TABLE. 


ao CE RSM 


NAME PL “o¥ Lan 
FCS $2D 
LDB #NAME 
INIT LDA NAME 
INCB 
CMPA NAME 
BNE INIT 


The first instruction stores “Dylan” in the five memory 
addresses beginning with NAME. The next instructions 
process this data. 


Changing the 
Assembly Listing 


You can use three pseudo ops to change the listing the 
assembler prints for you: 


e TITLE, inserts a title at the top of each listing page 
e@ PAGE, ejects the listing to the next page 


@ OPT, turns on or off the switches that determine how 
the assembler lists “macros” (Macros are discussed 
in the next chapter.) 


TITLE string 


Tells the assembler to print the first 32 characters of the 
string at the top of each assembly listing page. Example: 


Tet he 


causes the assembler to print Budget Program as the 
title of each page in the assembly listing. 


PAGE 


Starts a new page if the assembly listing is being printed 
on the line printer. Example: 


PAGE 
tells the assembler to eject the listing to the next page. 


Budget Program 


OPT 
OPT switch, switch,... 


Causes the assembler to use the specified switches 
when printing its listing. You can specify these switches 


with OPT: 
MC List macro calls (default) 
NOMC Do not list macro calls 


MD List macro definitions (default) 
NOMD Do not list macro definitions 
MEX List macro expansions 
NOMEX Do not list macro expansions (default) 
a Turn on the listing (default) 
NOL Turn off the listing 
Example: 
OPT MEX 


Causes the assembler to list the macro expansions in its 
listing. (Macros are discussed in the next chapter.) 


Conditional Assembly 


You may want to execute a certain section of your pro- 
gram only if a certain condition is true. The Disk 
EDTASM lets you set up a “conditional” section of your 
program, using these two pseudo ops: 


COND 


COND condition expression 


Assembles the following instructions only if the expres- 
sion is true (non-zero). If not true (zero), the assembler 
goes to the instruction that immediately follows the 
ENDC instruction. 


Only these operators are recognized in a condition ex- 
pression: +,-,/,*. See ENDC below for an example. 


ENDC 
ENDC 


Ends a conditional assembly, initiated by COND. 
Examples: 
COND SYMBOL 


ENDC 
assembles the lines between COND SYMBOL and 
ENDC only if SYMBOL is not equal to zero. 


COND VALUES-YVALUEI 


ENDC 
assembles the lines between VALUE2-VALUE1 only if 


VALUE2-VALUE1 are not equal (which causes the result 
to be a non-zero value). 
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Including Other 
Source Files 


To let you load another source file and include it in your 
program, the Disk EDTASM offers an INCLUDE pseudo 
Op. 


INCLUDE 
INCLUDE filespec 


Inserts filespec, a file of source assembly language in- 
structions, at the point where INCLUDE appears in the 
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program. The assembler assembles the entire included 


file before assembling the next instruction. 
Example: 
INCLUDE ROUTINE/SRC 


inserts and assembles ROUTINE/SRC, a source file, be- 
fore assembling the next instruction. 


INCLUDE SUB1/SRC 
INCLUDE SUB2Z/SRC 


inserts and assembles SUB1, then inserts and assem- 
bles SUB2, then proceeds with the next instruction. 
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Chapter 12/ 
Using Macros 


A macro is like a subroutine. It lets you call an entire 
group of instructions with a single program line. This 
helps when you want to use the same group of instruc- 
tions many times in the program. 


This chapter first tells how to use a macro. It then gives 
guidelines on the format of a macro. 


How to Use a Macro 


To use a macro, you must first define it. For example, 
you could define the entire sample program (from Chap- 
ter 2) as a macro named GRAPH. 


After defining the macro, you can use its name the same 
way you use a mnemonic. Whenever the assembler en- 
counters the macro’s name, it expands it into the defined 
instructions. 


Defining a Macro 
To define a macro, you need to: 


e Use MACRO (a pseudo op) to begin the macro defini- 
tion and assign it a name. 


e Use source instructions to define the macro. 
@ Use ENDM (a pseudo op) to end the macro definition. 


This is an example of the sample program converted into 
a macro definition: 


22032 GRAPH MACRO 

QB100 LDA #$F 9 
22110 LDX #EA4 00 
@2120 \.A STA +X+ 
00130 CMPX #$600 
20140 BNE \eA 
@2150 \.B JSR C$AGOO] 
22169 BEQ \+B 
20182 ENDM 


Line 30 names the macro as GRAPH, lines 50-160 de- 
fine the macro, and line 180 ends the macro definition. 


Notice the names of the symbols within the macro def- 
inition: \.A and \.B. If you do not use this format for 
naming symbols, you'll get a MULTIPLY DEFINED SYM- 
BOL error when you call the macro more than once. 
(More on this later.) 


Insert the above program using (SHIFT) (CLEAR) to gener- 
ate the backslash character (\). Save the program on 
disk as MACRO1 and then delete it. 


WD MACRO (CENTER 
D#:% (ENTER 


Calling a Macro 


To call a macro, simply use the macro name as if it were 
a mnemonic. For example, this sample program calls 
GRAPH and then ends: 


20110 ORG $1200 
02120 BEGIN JMP START 
020130 FDB DONE-BEGIN 
22i4@ START *#* 

20150 INCLUDE MACRO1/ASM 
22160 GRAPH 

20170 . CLR $71 

220180 JMP CSPPFEI 
2190 DONE * 

QB200 END 


Line 150 loads MACRO1, the file containing the defini- 
tion of GRAPH, and includes it in the source program. 
Line 160 calls the GRAPH macro. 


To see how the assembler expands the GRAPHIC mac- 
ro, insert this line: 


20135 OPT MEA 


and assemble the program. The assembler listing shows 
how the assembler expands GRAPH into its defined in- 
structions. 
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Note that the assembler has replaced \.A with AOOOO 
and \.B with BOOOO. The zeroes indicate that this is the 
first expansion of the symbols in GRAPH. (In this case, 
this is the only expansion.) 


Passing Values to a Macro 


A convenient way to use a macro is to pass values to it. 
You can use a macro many times in your program, pas- 
sing different values to it each time. 


This is a definition of the GRAPH macro, slightly mod- 
ified so that you can pass two values to it. Insert this 
program, save it as MACRO2 and then delete it. 


00030 GRAPHZ MACRO 

22190 LDA \@ 
20110 LDX MI 
@G120 \.A STA +X+ 
08130 CMPX #EGO0O 
0214 BNE \eA 
221530 \.B JSR [$AG8O] 
08160 BEQ \+B 
001908 ENDM 


The \O and \1 are dummy values. The assembler re- 
places these numbers with the values you specify when 
you call GRAPH. 


The following program calls GRAPH2 three times. Each 
time it passes two different sets of values: 


201d ORG $1200 
00110 BEGIN JMP START 
00120 FDB DONE-BEGIN 
00130 START #* 

00140 GPT MEX 

08150 INCLUDE MACRO2Z/ASM 
22168 GRAPH2 #EF QD +#$d00 
00170 GRAPH2 #$F 0 +#$450 
00180 GRAPH2 #EF 7 s#$500 
00190 CLR $71 

BB200 IMP CSFFFE] 
@0210 DONE 5 

28220 END 


When the assembler expands the macro, it replaces the 
dummy values with the values passed by the macro call. 
For example, the second time GRAPH2 is called, the 
assembler replaces \0 with #$F8 and replaces \1 with 
#$450. 


Assemble the above program. Note that each time the 
assembler expands GRAPH2, it replaces the \.A and 
\.B symbols with different symbol names: First AOOOO 
and BO000, then A0001 and BOO01, and finally AOO002 
and Boo0oz2. 
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SN 


If the assembler used the same symbol names in each oO 


expansion, it would be forced to assign different value to 
the symbols in each expansion. You would get a MULTI- 
PLY DEFINED SYMBOL error. 


Also, note the assembler has inserted an additional sym- 
bol, NARG, in the symbol table. NARG is always set to 
the number of values passed in the most recent macro 
Call. 


In the sample program, the symbol table shows that 
NARG is set to “2” at the end of the assembly. This 
shows that there were two values passed to GRAPH2 
the last time it was called. 


You might want to use NARG as a variable in your pro- 
gram. For example, you could conditionally assemble 
parts of a macro definition based on the current value of 
NARG. 


To see the program run, assemble it to disk, press a key 
three times to see different graphics and then end the 
program. 


Format of Macros 


The remainder of this chapter gives details on the format 
to use in a macro definition and macro call. 


Macro Definition 


Beginning the Definition 


Use this format for beginning the macro definition and 
assigning it a name: 


MACRO 
symbol is the name of the macro. It is, of course, required. 


symbol 


Using Symbols in the Definition 


Use this format to name any symbols you use within a 
macro definition: 


\.C 


c is an alpha character (A-Z). When the assembler ex- 
pands the macro, it replaces \.c with: 


Chinn) 


nnnn is a 4-digit hexadecimal number that the assembler 
increments each time the assembler expands the macro. 


} 


CESS 


ey 


a 


For example, if you use the symbol \.M in the macro 
definition and you call the macro 10 times, the assem- 
bler replaces \.M with these symbol names: 


1st expansion M0001 
2nd expansion M0002 
10th expansion MQ00A 


You must use this symbol-name format when calling a 
macro more than once. Otherwise, you get MULTIPLY 
DEFINED SYMBOL errors. 


Using Dummy Values in the Definition 


Use this format for specifying dummy values within a 
macro definition: 


\n 


nis an alphanumeric character (0-9,A-Z). The assembler 
replaces this dummy value with a corresponding value in 
the macro call line: 


\0 is replaced with the 1st value 
\1 is replaced with the 2nd value 


\9 is replaced with the 10th value 
\A is replaced with the 11th value 


\Z is replaced with the 36th value 
For example, this line in a macro definition: 
LDA \B 


specifies \B as a dummy value. The assembler replaces 
\B with the 12th value in the macro call line. If the mac- 
ro call line is: 


ADD NUM@>»NUMI »>NUM2 sNUMS3 +NUMG4 » 
NUMS »>NUMG »>NUM7 »NUM8 +>NUMS »>NUMA »>NUMB 


the assembler replaces \B with NUMB. 


You do not need to assign macro call values to dummy 
values in consecutive order. For example: 


GRAPH #EF 9 +#S$400 -#S$600 
GRAPHX MACRO 

LDX \1 

LDY \2 

LDA \@ 

LDB \@ 

ENDM 


Here, the assembler replaces dummy value \1 with 
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#$400, replaces dummy value \2 with #$600, and, in 
two lines, replaces dummy value \0O with #$F9. Note 
that you can pass a value to a macro more than once, 
as this example does with #$F9. 


lf there are more dummy values than values in a macro 
call, a byte overflow error results. 


If there are more values than dummy values in a macro 
call, the extra values are ignored. 


Be sure not to enclose dummy values in quotes. If you do 
this, the assembler treats them as ordinary characters. 


Ending the Macro Definition 
Use this format for ending the macro definition: 
ENDM 


You may not use a symbol to label this line. If you do so, 
you get a MISSING END STATEMENT error at the end 
of the assembly listing. 


Macro Call 


Use this format when passing values to a macro ina 

macro call line: 
macro call — string1, string2, ... 

macro call is the name of the macro. 


string(s) is the value being passed to the macro. It can 
be 1 to 16 characters (any extra characters are ignored). 


Each string, except the last, must be separated by a 
comma. The last string must be terminated by a comma, 
space, Carriage return, or tab. 


Each string may contain any characters except a Car- 
riage return. If a string contains a comma, space, tab, or 
left parenthesis, you must enclose it in parentheses. For 
example, in this macro call: 


PRINT (ABC +DEF) 


the assembler interprets ABC,DEF as a single string. 
However, in this call: 


PRINT ABC »DEF 


the assembler interprets ABC as one string and DEF as 
another. 


Hints on Macros 


@ Remember to define a macro before calling it. If you 
call a macro without defining it, you get a BAD 
OPCODE error. 


12 /USING MACROS 


er 


@ We recommend storing all macro definitions in a file cover the error until you call the macro. The assem- ww 
and then using INCLUDE to insert them into your bler waits until you call the macro before it assembles 
main program. it. 
e Do not use a mnemonic or pseudo op as a macro @ You cannot “nest” macro definitions. That is, one 
name. This causes the assembler to redefine the macro definition cannot call another. 
mnemonic or pseudo op according to the macro 
ee epee e Using the same macro more than once uses a large 
amount of memory. Expand a large macro only once. 
@ If the macro definition has an error, you will not dis- When you want to use it again, call it as a subroutine. 
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SECTION IV 


ROM AND DOS 
ROUTINES 


SAINILNOU 


CTS 


SECTION IV 


ROM AND DOS ROUTINES 


a 
In an assembly language program, the sim- 
plest way to use the I/O devices is with ROM 
and DOS routines. This section shows how. 
Complete lists of the ROM routines and DOS 
routines are in the reference section. 

—, 
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Chapter 13/ 
Using the Keyboard and Video Display 
(ROM Routines) 


The Color Computer uses its own machine-code 
routines to access the screen, keyboard, and tape. 
These routines are built into the computer's ROM. You 
can use the same routines in your own program. 


Appendix F lists each ROM routine and the ROM 
address that points to it. This chapter uses two of these 
routines, POLCAT and CHROUT, as samples in show- 
ing the steps for using ROM routines. 


Steps for Calling ROM 
Routines 


We recommend these steps for calling a ROM routine: 


1. Equate the routine’s address to its name. This lets 
you refer to the routine by its name rather than its 
address, making your program easier to read and 
revise. 


2. Set up any entry conditions required by the routine. 
This lets you pass data to the routine. 


3. Preserve the contents of the registers. Since many 
routines change the contents of the registers, you 
might want to store the registers’ contents temporarily 
before jumping to the routine. 


4. Call the ROM routine, using the indirect addressing 
mode. 


5. Use any exit conditions that the routine passes back 
to your program. 


6. Restore the contents of the registers (if you tempo- 
rarily preserved them in Step 3). 
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Sample 1 
Keyboard Input with 
POLCAT 


POLCAT “polls” the keyboard to see if you press a key. 
If you do not, POLCAT sets Bit Z. 


lf you do press a key, POLCAT: 


(1) Clears Bit Z of Register CC and 
(2) Loads Register A with the key’s ASCII code. 


This short program uses POLCAT to poll the keyboard. 
When you press a key, the program ends: 


ORG $1200 
BEGIN JP START 

FDB DONE-BEGIN 
POLCAT EQU FAGAD 
START PSHS DP;CC+k+¥+U 
WAIT JSR [CPOLCAT] 

BEQ WAIT 

PULS DP»sCO +X +¥ +U 

NE $71 

ane LSFFFE) 
DONE * 

END 


This is how we applied the above steps in writing this 
program: 


1. Equate POLCAT to its Address 


This equates POLCAT to $A000, the address that points 
to POLCAT’s address: 


POLCAT EQU F$ABAS 


13 /USING THE KEYBOARD AND VIDEO DISPLAY 
Caner ee eee ee ere eee EEE —==ExX 


2. Set Up Entry Conditions @ Register A — to determine which character to 
print 


POLCAT has no entry conditions. 
e Address $6F — to determine whether to print it 
on the screen or the printer 


3. Preserve the Registers’ Contents , , ae 
This program uses CHROUT to print “This is a Mes- 


POLCAT’s “Exit Conditions” state that POLCAT mod- 
ifies all registers except B and X. Assume that you want 
to preserve the contents of Registers DP, CC, X, Y, and 
U. To do this, you can “push” these values into the 


sage” on the screen. It then uses POLCAT to wait for 


you to press a key before returning to BASIC. 


ORG 


$1200 


“hardware stack”: HHE*¥*#*2 Equates for Routines *####* 
POLCAT EQU $ABAS 
Pons DPsCC +k +¥ +U CHROUT EQU $AGBS 
DEVNUM EQU $6F 
(The hardware stack is an area of memory, pointed to by gee oe4U0e cia ee eke .. ee 


Register S, that the processor uses for subroutines. 
PSHS “preserves” the contents of certain registers by 
storing them in the hardware stack.) 


SCREEN EQU 


*#*#* DOS Programming Convention 


oO 
HH % 


BEGIN war START 
FDB DONE-BEGIN 
4. Jump to POLCAT HHEKEEEE Print the Message #H#HHHHES 
START LDB #5 CREEN 
This jumps to POLCAT using its indirect address: STB DEYUNUM 
WAIT JSR  CPOLCATI Se ee 
PRINT LDA K+ 
o2 JSR CCHROUTI 
5. Use Exit Conditions CMPA #$0D 
BNE PRINT 
For now, assume you want to look only at the status of KRHEEEEEE Wait for a Key #HEEKHEHH OD 
Bit Z to see if a key has been pressed: INPUT PSHS DP.CO MY a, 
BEQ WAIT WAIT JSR [CPOLCAT I 
BEQ WATT 
The above instruction branches back to WAIT (the JSR PULS DPC X%eYoU 
[POLCAT] instruction) unless you press a key. (Pressing CLR 71 
a key causes POLCAT to clear Bit Z.) IMP [$F FFE] 


KHHEHEKKKKKHEKEEE Meg cage KHHEHEHHHEEKEE 


6. Restore the Register’s Contents Me ae ae IS A MESSAGE ’ 
KHHEEHEEE Momory for Stack ## HEHEHE 


This “pulls” (inserts) the contents of the hardware stack 
back into the registers: 


PULS DP+CC +X eV +U 


Now, the above registers are restored to the data they 
contained before executing the POLCAT routine. 


DONE * 
END 


Most of the steps we used in writing this program are 
obvious. What may not be obvious is the way we set up 
CHROUT’s entry conditions, Address $6F and Register 


A. 
Sample 2 These lines set Address $6F to 00 (the screen): 
} DEVNUM EQU $6F 
Character Output with eo 
CHROUT START LDB #SCREEN 
STB DEVNUM 


The CHROUT routine prints a character on either the 
screen or printer. On entry, it checks two places: 
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CS 


setting Register A involves two steps. First, point Regis- 
ter X to the message: 


MSG FCC ‘THIS IS A MESSAGE ’ 
FCB $0D 
LDX #MSG 


and then load Register A with each character in the mes- 
sage: 


PRINT LDA +X+ 
JSR CCHROUT J 
CMPA ##0D 


BNE PRINT 


Sample 3 
POLCAT and CHROUT 


This combines POLCAT with CHROUT. It prints on the 
screen whatever key you press. When you press (}) 
(hexadecimal OA), the program returns to BASIC: 


ORG $1200 
HHHE#e% Equates for Routines 
POLCAT EQU $AAAS 
CHROUT EQU $AGAZ 
y E 
oo DEVNUM EQU $6 


HREEHEE 
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HHEEKKKHKKHEHEE Variable HHH KHKKHHHEEE 
SCREEN EQU OO 


*¥*¥*# DOS Programming Convention *** 


BEGIN IMP MAIN 

FDB DONE-BEGIN 
HHEKRHKEHKEE Main Program *kE#EKKHEHHHE 
MAIN JSR INPUT 

CMPA ##04 


BEQ FINISH 
JSR PRINT 
BRA MAIN 
FINISH Gir $71 
mah CSPFFFE] 
* Input a Character from Keyboard * 


INPUT PSHS ODP sCC ox +¥ +0 
WAIT JSR CPOLCATI 
BEQ WATT 
PULS OPsCl Ko ¥ 2 
RTS 


** Print a Character on Display *+%* 
PRINT LDB #S5CREEN 

STB DEYNUM 

J&R CCHROUTI 


RTS 
HHEEHEEE Memory for Stack *###¥H# HHH 
DONE % 

END 


sitar ironeeipaoininninsinn ai DSS et =, + Se 


Chapter 14/ 
Opening and Closing a Disk File 
DOS Routines — Part | 


Because of the organization and timing of a disk, reading 
it and writing to it are complex. This is why you'll want to 
make use of DOS routines in your disk programs. 


This chapter shows how to use DOS routines to open 
and close a disk file. The next chapter shows how to use 
them to read a disk and write to it. Reference H contains 
a complete list of all the DOS routines supported by 
Radio Shack. 


Overview 


All DOS routines, like ROM routines, have their own en- 
try and exit conditions. However, most DOS routines 
have more involved entry conditions than do ROM 
routines. They require you to set up three areas in mem- 
ory: two “buffers” and a “data control block.” 


Buffers 


Buffers are areas in memory that DOS uses for storing 
data to be input or output to disk. DOS requires that you 
reserve two buffers: 


@ A logical buffer — This can be any length. Your pro- 
gram uses this to store data for DOS to input or output 
to disk. 


e A physical buffer — This must be 256 bytes. DOS 
uses this to hold data temporarily so that it can input 
and output the data to a disk sector in 256-byte 
blocks. 


For example, suppose you want to output 100 10-byte 
records to disk. You can send each record, one at a 
time, to the area you reserved as the logical buffer. 


DOS then transfers the records from the logical buffer to 
the area you reserved as the physical buffer. As soon as 


a 
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there are 256 bytes in the physical buffer, DOS sends 
them out to a disk sector. 


You need not be concerned that DOS’ “physical” rec- 
ords are a different size from your program’s “logical” 
records. DOS handles the “spanning” of logical records 
into physical records internally. Except for reserving 
memory for a physical buffer, you do not need to be con- 
cerned with physical records. 


Data Control Block 


A data control block is a 49-byte “block” of memory that 
DOS uses to control a disk file. You need to reserve this 
block of memory for each disk file you are using. If you 
have three disk files open at the same time, you need to 
reserve three 49-byte data control blocks. 


Reference G shows how DOS uses each of the 49 
bytes, numbered 0-48, in the data control block. As you 
can see, DOS divides the data control block into 21 
data-control segments. 


Before opening a file, you must load the proper data into 
four of the segments of the data control block (DCB): 


DCB Segment DCB Address You must load 


with... 
Filename Bytes 0-7 The eight- 
(DCBFNM) character name 
of your file. 
Extension Bytes 8-10 The three 
(DCBEXT) character 
extension of 
your filename. 
Drive Number Byte 33 The drive 
(DCBDRV) containing the 
disk file. 


Physical Byte 36-37 The first 

Buffer Address address of 

(DCBBUF) the physical 
buffer you 


have reserved. 


For example, if you want to open a file in Drive 1, you 
need to load “1” into the DCBDRV location, which is the 
33rd byte of the data control block. 


You need not be concerned with most of the remaining 
segments of the data control block, unless you want to 
use them as data in your program. They are handled 
internally by DOS. The exceptions to this are: 


@ Logical Buffer Address, Record Size, Variable Record 
Terminator, and Logical Record Number — You need 
to use these when you read and write to the file. They 


are discussed in the next chapter. 


File Type and ASCII Flag — |f you want your file to be 
compatible with BASIC and other Radio Shack pro- 
grams, you need to set these when you create the file. 
See the “Technical Information” chapter of your Disk 
System Owners Manual and Programming Guide. 


Steps for Using DOS 
Routines 


The steps for using DOS routines are: 


1. Equate the routine’s address (for ease in reading the 
program). 


. Reserve memory for a physical buffer, logical buffer, 
and the DCB. 


. Clear the DCB and the physical buffer. You need to 
make sure they do not have extraneous data. 


. Set up all other entry conditions. Besides setting up 
registers, you need to load certain segments of the 
DCB with data. Which segments you load depends 
on the DOS routine you are using. 


. Preserve the contents of the registers. DOS routines 
change the contents of many of the registers. To be 
safe, you should preserve all of them that you want to 
use later in your program. Be sure to preserve Regis- 
ters U and DP. If DOS changes their contents, your 
program acts unpredictably. 


6. Call the routine. 
. Restore the contents of the registers. 
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ESE 


8. Use all exit conditions. Most DOS routines return an 
error code in Register A if the routine did not work 
properly. If there were no errors, Register A contains 
a zero. 


Sample Session 
Opening and Closing 
a Disk File 


The DOS routines for opening and closing a file are 
OPEN and CLOSE. Both routines check Register U for 
the address of DCB. They expect to find the four seg- 
ments described above in this block. 


OPEN also expects you to set a file mode in Register A. 
It creates or opens an existing file depending on the 
mode you set. 


Both routines return a status code in Register A. Refer- 
ence | tells the meaning of the status codes. 


Figure 8 at the end of this chapter is a sample program 
which creates, opens, and closes a disk file named 
WORKFILE/TXT. After running this program, you can 
look at your directory to see that the program has cre- 
ated this file. This shows how we applied the above = 
steps in this program. | 


1. Equate OPEN and CLOSE 


This equates OPEN and CLOSE to $600 and $602, their 
indirect addresses: 


OPEN 
CLOSE 


$600 
$602 


EQU 
EQU 


2. Reserve Memory for 
Buffers and DCB 


The OPEN and CLOSE routines use only the physical 
buffer, not the logical buffer. This stores 256 bytes for 
the physical buffer and uses PBUF to label those bytes: 


PBUF RMB 206 


This reserves memory for a 49-byte DCB and stores the 
filename, WORKFILE, and the extension, TXT, in the 
first 11 bytes: 


DCB EQU * 
FCC ‘WORKFILE ’ 
PCC Je © S 
RMB 38 


Se ee eh 


oo 
3. Clear DCB 
This clears all but the first 11 bytes of DCB: 


RCLEAR LDX #DCB+11 

CLEAR] CLR +A+ 
CMPX #DCB+48 
BNE CLEARI 
LDX #PBUF 

and this clears the physical buffer: 

CLEAR2 CLR K+ 
CMPX #PBUF+255 
BNE CLEAR2 
RTS 


4. Set Up Entry Conditions 


On entry, OPEN and CLOSE require you to: (1) Set 
Register U to a DCB containing a filename, extension, 
drive number, and physical buffer address, and (2) Set 
Register A to a file mode. 


Setting Register U 


This sets Register U to the address of the first byte of 
© the DCB: 


LDU #DCB 


The following lines set the drive number segment to 0. 
They do this by storing DRVNUM (0) into DCBDRV (33) 
+ the contents of Register U (DCB). This inserts 0 into 
the 33rd byte of DCB: 


DCBDRY EQU 33 
DRYNUM FCB od 
LDA DRYNUM 
STA DCBDRY +U 


The following lines set the physical buffer address to 
PBUF. They do this by storing the address of PBUF into 
the memory address pointed to by Register U plus 
DCBBUF. This stores PBUF in the 36th byte of DCB: 


DCBBUF EQU 36 
LDA #PBUF 
STxX DCBBUF +U 


(The filename and extension were set in Step 2.) 


Setting Register A 


This table shows how you should set each bit in Register 


oe 


A to select one or more file modes: 


MODE BIT DECIMAL NUMBER 
(IF SET) 
Read Bit O 1 
Write Bit 1 2 
Create Bit 2 4 
Extend Bit 3 8 
Work File Bit 4 16 
(delete the file, wnen closed) 
FAT Bit 5 32 
(rewrite to the FAT* only when closed) 
Shared Buffer Bit 6 64 


“The disk directory’s FAT (file allocation table) is de- 
scribed in the “Techncial Information” chapter of the 
Disk System Manual. 


The sample program loads Register A with decimal 
14+2+44+8+32: 


LDA 


This tells DOS to set the file mode to read (decimal 1), 
write (decimal 2), create (decimal 4), extend (decimal 8), 
and rewrite the FAT only when the file is closed (decimal 
32). 


#1+24+4+8+32 


5. Preserve Registers 

This preserves the contents of Registers U and DP: 
ROPEN POMS U+DP 

6. Jump to the DOS Routine 

These lines jump to OPEN and CLOSE: 


JSR [COPENJ 
JSR LLLUSe 3 


7. Restore Registers 


_ This restores the contents of Registers U and DP: 


Pus UsDP 


8. Use Exit Conditions 


The sample program branches to an error handling sub- 
routine after each DOS routine. The subroutine tests 
Register A to see if it contains a non-zero value. If so, it 
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qr 


prints the status code on the screen and waits for you to 


press a key: 
JSR ERROR 
TSTA 
BEQ RETURN 
STA $450 

WAIT JSR [POLCAT] 

BEQ WAIT 
RETURN RTS 


Figure 8. Sample Program to Open and Close a File 


ORG $1200 
**Equates for DOS and ROM routines ** 
OPEN EQU $60O 
CLOSE EQU $602 
POLCAT EQU FADD? 
HH#H2*8£% Equates for DCB offsets ### HE 
DCBDRY EQU Be 
DCBBUF EQU 36 
¥¥*#¥*#e2D05 Programming Convention *##** 
BEGIN JP MAIN 
FDB DONE-BEGIN 
KREEKKEEKKEKEKEKEE Main Program *###X#EREEREE 
MAIN JSR RCLEAR 
J5k ROPEN 
JSR RCLOSE 
CLR $71 
PP C$PFFEJ 


KHHHk*#eROUtine to Clear the DCB *#*##** 
HHEEHSE*E* and Physical Buffer #*#### HHH 


RCLEAR LDX #DCB+t+i11 

CLEARI CLR sX+ 
CMPH #DCB+48 
BNE CLEARI 
LDX #PBUF 


CLEARZ CLR K+ ed 
CMPX #PBUF +255 
BNE CLEARZ2 
RTS 
HHEHkee ROUTING to Oren File ###H### 
ROPEN PSHS U»DP 
LDU #DCB 
LDA DRYUANUM 
STA DCBDRY +U 
LDX #PBUF 
STH DCBBUF +U 
LDA #14+2+4+68+32 
J&R COPEN] 
PULLS U+DP 
JSR ERROR 
RTS 
H¥*¥#*2*% Routine to Close the File *###### 
RCLOSE PSHS U»DP 
LDU #DCB 
oe LLLUSeE 2 
PULS U»DP 
JSR ERROR 
RTS 
HH#*£eS8*%# Error Handling Routine ######* 
ERROR TSTA 
BEQ RETURN 
STA $450 = 
WAIT JSR [POLCAT] 
BEG WAIT ed 
RETURN RTS 
**¥*% Memory for Buffers and Stacks **#** 
PBUF RMB 206 
HHEKEHHREMemory for Variables ####XHEE 
DRYNUM FCB Oo 
HREEKEKHEEHREMemorY for DCB H#XHHKEHHEE 
DCB EQU ¥ 
FEG ‘WORKFILE ’ 
ane i Se Sn 
RMB 38 
KEKEKKK HERE KKREKRKEHRK HK KRK KK EHE KEE EHR HREHEKEEE 
DONE EQU ra 
END 


Chapter 15/ 
Reading and Writing a Disk File 
DOS Routines — Part 2 


DOS has a WRITE routine for writing to a file and a 
READ routine for reading it back into memory. The way 
you use these routines depends on which method you 
are using to access the file: 


@ Sequential Access 
e@ Direct Access 


This chapter describes how to use these two methods in 
their simplest forms. You can use any variation of them 
that you want. 


o Sequential vs. Direct Access 


Sequential Access 
(For Files with Variable-Length Records) 


Sequential access lets you read and write to files with 
variable-length records. Using this method, you insert a 
terminator character at the end of each record. This 
character tells DOS where each record ends. 


Before writing data to the file, you must load DCB with 
the following: 


DCB Segment DCB Address You must 


load with... 
Logical Bytes 39-40 __ The first 
Buffer Address address of the 
(DCBLRB) logical buffer 
you have 
reserved 
Terminator Byte 19 The character 
Character you select 
(DCBTRM) to end each 
record 
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When reading data from just one file, you need only 
specify the logical buffer address, not the terminator 
character. DOS reads the terminator character from the 
disk’s directory into DCBTRM. 


Figure 9 at the end of this chapter is a program that 
writes to a file using $0D (the character) as a 
terminator character. Figure 10 reads the same file back 
into memory. 


Direct Access 
(For Files with Fixed-Length Records) 


Direct access works only with files containing fixed- 
length records. With this method, DOS uses the record 
size and record number to access the record. 


Before reading data from the file or writing data to it, you 
must set this DCB segment: 


DCB Segment DCB Address You must 
load with.. 
Logical Bytes 39-40 The address 
Buffer Address of the first 
(DCBLRB) byte of the 
logical buffer 
you have 
reserved 


Unless you are using the record size already in the file's 
directory, you must also set: 


Bytes 17-18 The size of 


each record 


Logical Record 


Size (DCBRSZ) 
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lf you want to write a record which is not sequentially the ¥eeee*% Equates for DCB offsets #¥xeeee WY 
next one, you must also set: DCBTRM EQU ig 
' DCBDRY EQU ee 
Logical Bytes 46-47 The number of DCBBUE FOU 38 
Record Number the record DCBLRB FOU 39 
(DCBLRN) you want to H#*#*#*DOS Programming Convention ###*##*+* 
sccaiadata BEGIN JMP MAIN 
FDB DONE-BEGIN 
KHHHKRHHKRHHEHHE MAIN Program #H#HEKKHHEHHESE 
P MAIN JSR CLEAR 
Setting the JSR INTDCB 
i é JSR SOPEN 
Read/Write Option ae setae 
war SWRITE 
DOS requires that you set Register A with a “read/write JSR SCLOSE 
option” before entering the READ or WRITE routines. CLR $71 
The read/write option lets you specify: JMP C$FFFE] 


HHH€#*%2 Routine to Clear the DCB ## #44 


@ Whether you want direct or sequential access ehd the Paveical andl ay peetonerrere 


@ Whether you want DOS to point to the next record CLEAR LDx #PBUF 
after reading or writing the record CLEARI CLR rK+ 
CMPX #PBUF+255 
To set the read/write option, load the first two bits of BNE CLEARI 
Register A with one of these four values: LD #L BUF 
CLEAR2 CLR K+ 
Decimal CMPX #LBUF +24 
Read/Write Option Bits Number BNE CLEAR2 * 
| LDX #DCB+11 } 
Direct Access 00 0 CLEAR CLR h+ WwW 
Point to next record CMP #DCB+48 
Sequential Access 01 1 BNE CLEARS 
Point to next record RTS ' 
HRHEHHEHEHH Routine to Insert KH¥EREEEEE 
Direct Access 10 2 KEEEHHKES Yalues in the DCB xx KKHHS 
Do not point to next record INTDCB LDU #DCB 
Sequential Access 11 3 sey acapetl u 
Do not point to next record [pa #$0D 
For example: STA DCBTRM +U 
LDX #PBUF 
LDA #2 
STX DCBBUF +U 
JSR TREAD] LDY #L BUF 
tells DOS to write the record sequentially (up to the ter- STX DCBLRB+U 
minator character). When finished, DOS points to the RTS 
next sequential record. HHH##*#*#ROUtTIine to Open a File *###*#### 
, : SOPEN LDU #DCB 
Figure 9. Sample Program to Write to a File PSHS U>DP 
: LDA #1+2+4+8+32 
ORG reeee , JSR [OPEN] 
**¥Equates for DOS and ROM routines ** PULS UsDP 
OPEN EQU inci JSR ERROR 
CLOSE EQU $602 RTS 
WRITE EQU $606 KEKHKHKEER tAT 7 Print Ms to ##HHHHEE 
POLCAT EQU $ADOO OPC gee fe et ave 
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aS 


os 


SPRINT LDY #ESOOD 
LDX #MSG 

CHAR LDA X+ 
STA V+ 
CMPA #EGA 
BNE CHAR 
LDX #LBUF 
Wee #$525 


HHHH##4#% Routine to Input Data #¥¥#HRE* 
HHEKKEHEKEESE From Keyboard HEHEHE HHHHHEES 


SINPUT PSHS Us»sDP+¥ 
WAITI JGR [POLCATI 
BEQ WAIT 
PULS UsDP+¥ 
STA V+ 
STA K+ 
CMPA #$ 2D 
BEQ ENDINP 
CMPX #LBUF +24 
BNE SINPUT 
ENDINP RTS 


HHHHHH#* Routine to Write Data #¥¥###### 
KEEKEKEKEHEEEE tO File KHEEKHEHEHEHHEEE 


SWRITE PSHS U»DP 

LDU #DCB 

LDA # | 

JSR CWRITE] 

PULLS U»DP 

JSR ERROR 

RTS 
HHH#EEE* Routine to Close File ###HHKREE 
SCLOSE PSHS U»DP 

LDU #DCB 

JSR LCLOSE 1 

PULLS U»+DP 

JSR ERROR 

RTS 
HHEk##*#*2 Error Handling Routine #### HE 
ERROR TSTA 

BEQ RETURN 

STA $45 
WAIT2 JSR CPOLCAT] 

BEQ WAIT2 
RETURN RTS 
*¥*¥% Memory for Buffers and Stacks **##* 
PBUF RMB 206 
LBUP RMB Zo 
HEHEKHHEERMemory for Variables ######## 
DRYNUM FCB ao 
KHHEKKEEKEEKEEMOMOry for DCB ##¥HHHHHEEE 
DCB EQU * 

FEC ‘WORKFILE ° 

FCC a a a 

RMB 38 


HHEEHEEHEMemory for Message KHEHHEHEE 


MSG FCC ‘ENTER YOUR NAME: ’ 
EEK ERK KKEE KKK EEE KEE EE KEKE EE KEKE EEE ES 
DONE EQU % 

END 


Figure 10. Sample Program to Read to a File 


Note: When running this program, a status code 
(generated by the Error subroutine) may appear 
on your screen. Press any key to continue 
program execution. 


ORG $1200 
**Equates for DOS and ROM routines ** 
OPEN EQU $600 
CLOSE EQU $602 
READ EQU $604 
POLCAT EQU SADA 
CHROUT EQU $ACW2Z 
H¥#*e*#% Equates for DCB offsets ####HEE 
DEVYNUM EQU $6F 
SCREEN EQU @ 
DCBTRM EQU is 
DCBDRY EQU at 
DCBBUF EQU 26 
DCBLRB EQU oo 
¥*¥*¥8#*2D0S5 Programming Convention *#*### 
BEGIN JMP MAIN 
FDB DONE-BEGIN 
HHEKKEKEHEEEKEMaAIiN Program *#*### XK HRREEE 
MAIN JSR CLEAR 
JSR INTDCB 
JSR SOPEN 
Jor SREAD 
JSR SCLUSE 
JSR SPRINT 
CLR $/i 
JMP ($FEEE I 


Clear the DCB **#*#*#* 
and Logical Buffers 


HHEH*#e ROUTING to 
and the Physical 


CLEAR LDA #PBUF 
CLEARI CLR sX+ 
CMP #PBUF+255 
BNE CLEARI 
LDX #LBUF 
CLEAR2 CLR sX+ 
CMPA #LBUF +24 
BNE CLEAR 
LDX #DCB+i1l 
CLEARS CLR sK+ 
CMPA #DCB+48 
BNE CLEARS 
RTS 


15 /READING AND WRITING A DISK FILE 


KRHEEKHEKHEE Routine to Insert KH¥HRREHEHESE 


RHEHHEKRHEE VYalues 


the DCB KHER KHHHEES 


INTDCB LDU #DCB 
LDA DRYNUM 
STA DCBDRY »U 
LDA #$2D 
STA DCBTRM+U 
LDX #PBUF 
STX DCBBUF +U 
LDX #L BUF 
STK DCBLRB +U 
RTS 
HHEHEHK*e¥ROULInGe to Oren a File ####eE* 
SOPEN PSHS U»DP 
LDU #DCB 
LDA #HLOF 
JSR COPEN] 
PULS U»DP 
JSR ERROR 
RTS 
HHHEH*HROUtLIine to Read a File *###**##* 
SREAD PSHS U+DP 
LDU #DCB 
LDA #3 
JSR [READ] 
PULS U»DP 
JSR ERROR 
RTS 
HHEHEE* Routine to Print Data ####HHEE 
SPRINT LDB #SCREEN 
STB DEYVNUM 
LDX #LBUF 
PRINT LDA K+ 
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JSR CCHROUTI 

CMPX #LBUF +24 

BNE PRINT 
WAITI JSR CPOLCAT] 

BEQ WAIT1 

RTS 
HEXkEHE* Routine to Close File *##H¥HH* 
SCLOSE PSHS U»DP 

LDU #DCB 

JSR (CLOSE 

PULS Ui +DP 

JSR ERROR 

RTS 
HHE#k*k*e*E rpror Handling Routine #¥KKHH 
ERROR TSTA 

BE RETURN 

STA $45¢ 
WAIT2 JSR CPOLCAT] 

BE Q WAIT2 
RETURN RTS 
¥#* Memory for Buffers and Stacks ###¥* 
PBUF RMB 205 
LBUF RMB Zo 
HHEEKEERE Memory for Variables *######% 
DRYNUM FCB OD 
KHEHHHEKKEEEMemOorY for DOB KHHHHKHKEEE 
DCB EQU * 

he “WORKFILE ‘ 

ae ead.” 

RMB 38 
EEK KEKKEKKHRHRK EKER KE KKK ERK KHRKKRHRKKKREKRERE 
DONE EQU % 

END 


SECTION V/ 


REFERENCE 


fC ee Ss 


SECTION V/ 


REFERENCE 


This section summarizes all the features of the 
Disk EDTASM. 
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Reference A/ 
Editor Commands 


Definition of Terms 


line 
A line number in the program. Any lines between 0-63999 may be used. These symbols may be used: 


# First line in the program 
* Last line in the program 
Current line in the program 


current line 
The last line inserted, edited, or printed. 


startline 
‘ The line where an operation will begin. In most commands startline is optional. If startline is omitted, the current line is 
used. 


An asterisk (*) denotes a comment line when used as the first character in the line. 
range 


The line or lines to use in an operation. If the range includes more than one line, they must be specified with one of 
these symbols: 


to separate the startline from the ending line 
, to separate the startline from the number of lines 


increment 
The increment to use between lines. In most commands, increment is optional. If the increment is omitted, the last 
specified increment is used. On startup, increment is set to 10. 


filespec 
A DOS disk file specification in the format: 


filename/ext:drive 


COMMANDS PAGES 


DISCUSSED 


A / EDITOR COMMANDS 


Cstartline, range, increment 
Copies range to a new location beginning with startline using the specified increments. start- 
line, range, and increment must be included. 


C308 +100:150,190 


Drange 
Deletes range. lf range is omitted, current line is deleted. 


Eline 


D108 


D1i@O:150 


D 


Enters a /ine for editing. If line is omitted, current line is used. 


These are the editing subcommands: 


E100 3 


> 


nCstring 


nScharacter 


Fstring 
Finds the string of characters. Search begins with the current line and ends each time string is 
found. If string is omitted, the last string defined is used. 


Cancels all changes and restarts the edit. 

Changes n characters to string. If n is omitted, changes 
the character at the current cursor position. 

Deletes n characters. If n is omitted, deletes character at 
current cursor position. 

Ends line editing and enters all changes without display- 
ing the rest of the line. 

Deletes rest of line and allows insert. 

Inserts string starting at the current cursor position. 
While in the mode, deletes a character, and 
CH ends the mode. 

Deletes all characters from the current cursor position to 
the end of the line. 

Lists current line and continues edit. 

Searches for nth occurrence of character. If n is omitted, 
searches for the first occurrence. 

Extends line. 

Ends line editing, enters all changes and displays the 
rest of the line. 

Escapes from subcommand. 

Moves cursor n positions to the right. If n is omitted, 
moves one position. 

Moves cursor n positions to the left. If n is omitted, 
moves the cursor one position. 


Prints range on the printer. If range is omitted, the current line is printed. 


FABC F 
Hrange 

Hidd Hidd:200 
istartline,increment 


H 


Inserts lines up to 127 characters long beginning at startline, using the specified increment. 
startline and increment are optional. 


115055 


1200 


I+1@ 
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SCS 


Oo 


Returns to DOS. 


LCA filename 
Loads filename from tape into the edit buffer. A is optional. If included, filename is appended to 
the edit buffer. If filename is omitted, the next tape file is loaded. 


LC SAMPLE/EA LCA SAMPLE/EAT 


LDA filespec 
Loads the specified file from disk into the edit buffer. A is optional. If included, filespec is 
appended to the current contents of the edit buffer. If extension is omitted, /ASM is used. 


LD SAMPLE/EXAT LDA SAMPLE/EXAT 


Mstartline, range, increment 
Move command, works like copy except the original lines are deleted. 


Nstartline, increment 
Renumbers beginning at startline, using the specified increment. startline and increment are 
optional. 


N1@@ +3 N18 N 


O 

Shows the hexadecimal values of (1) the first available memory address, (2) the last available 
address, and (3) USRORG, the address where the assembler originates an /IM assembly with 
the /MO switch. Then, prompts you to change USRORG. 


0 


Prange 
(Displays range on the screen. 


P1ig@:200 P1ig@is P # P+ 
P (Prints 15 lines to the screen) 


Q 
Returns to BASIC. 


R startline, increment 
Allows you to replace startline and then insert lines using increment. startline and increment 


are optional. 
R1igd+1d@ R1ae2 R 
S 
Shows the current printer parameters and lets you change them. 
Trange 
Prints range to the printer, without line numbers. 
Tide T1i@8:500 
Vfilename 


Verifies filename (a tape file) to ensure that it is free of checksum errors. Works like BASIC’s 
SKIPF command. If filename is omitted, this command verifies the next file found. 


WC filename 
Writes filename to tape. If filename is omitted, NONAME is used. 
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A / EDITOR COMMANDS 
earn n nnn nn nnn nn nnn SSS SSS 


WD filespec ad 
Writes filespec to disk. If the extension is omitted, ASM is used. 


WO SAMPLE/EX 
Z 


Jumps to ZBUG (EDTASM system only). 
Scrolls up in memory. 
Scrolls down in memory. 


SHIFT) (CLEAR 
Is used to create a backslash (\). 
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Reference B/ Assembler 
Commands and Switches 


COMMANDS PAGES 


DISCUSSED 


AC filename switch... 

Assembles the source program into machine code. If you specify the /IM switch, the assembly 
is in memory. If you specify filename, the assembly is saved on tape as filename. If you omit 
both filename and switch, the assembly is saved on tape as NONAME. 


AD filespec switch... 
Assembles the source program into machine code. Either the /IM switch or filespec is required: 
With /IM, the assembly is in memory; with filespec, the assembly is on disk. The D is optional. 


There must be a space between filespec and switch. 


The switches are: 
co 


/AO 
/IM 
/LP 
/MO 
/NL 
/NO 
/NS 
/SR 
/SS 
/WE 
/WS 


Examples: 


AD SAMPLE 


AD/IM/AD 


Absolute origin.(Applies only If /IM is set.) 
In-memory assembly. 

Assembly listing on the printer. 

Manual origin. (Applies only if /IM is set.) 
No listing printed. 

No object code generated. 

No symbol table generated. 

Single record. 

Short screen. 

Wait on assembly errors. 

With symbols. 


AD SAMPLE /WE/SR 
A SAMPLE/TST /WE 


AC SAMPLE 


AC 


—_ 


ETS 


r~ 
Definition of Terms 

expression 

One or more numbers, symbols, or ASCII characters. If more than one is used, you may separate them with these 

operators: 
Multiplication * Addition + 
Division .DIV Subtraction — 
Modulus .MOD Equals .EQU 
Shift — Not Equal .NEG 
Local And AND Positive + 
Exclusive Or .XOR Negative — 
Logical Or OR Complement NOT 

address 


(4 location in memory. This may be specified as an expression using numbers or symbols. 


filename 
A BASIC cassette file specification. 


filespec 
A DOS file specification. (The same as a BASIC specification.) 


COMMANDS PAGES 
DISCUSSED 
C 
Continues execution of the program after interruption at a breakpoint. 
D 
Displays all breakpoints that have been set. 
E 
Exits ZBUG and enters the editor. (This applies to the EDTASM ZBUG only, not to Stand- 
Alone ZBUG.) 
Gaddress 


Executes the program beginning at address. 


om 


2 aaa 


; 


Cc / ZBUG COMMANDS 


K 
Returns to DOS. (Applies to Stand-Alone ZBUG only.) 


LC filename address 
Loads filename from tape. The optional address offsets the file’s loading address. If filename is 
omitted, the next file is loaded. 


LD filespec address 
Loads filespec from disk. The optional address offsets the file’s loading address. 


LDS filespec address1 address2 

Loads filespec from disk with its appended symbol table. The optional address7 offsets the 
file’s loading address. The optional address2 offsets the symbol table’s loading address. Note 
that address2 does not offset the values of the symbols. The D is optional. 


PC filename start address end address execution address 

Saves memory from start address to end address to tape. You must also specify an execution 
address, the first address to be executed when the file is loaded. Filename is optional; if 
omitted, NONAME is used. 


PD filespec start address end address execution address 
Saves memory to disk from start address to end address. You must also specify an execution 
address, the first address to be executed when the file is loaded. (The D is optional.) 


PDS filespec start address end address execution address 

Saves memory to disk from start address to end address, with the current appended symbol 
table. You must also specify an execution address, the first address to be executed when the 
file is loaded. (The D is optional.) 


Q 
Returns to BASIC. (Applies to Stand-Alone ZBUG only.) 


R 
Displays the contents of all the registers. 


Taddress1 address2 
Displays the memory locations from address7 to address2, inclusive. 


THaddress1 address2 
Prints the memory locations from address7 to address2, inclusive. 


Usource address destination address count 
Transfers the contents of memory beginning at source address and continuing for count bytes 
to another location in memory beginning with destination address. 


Vfilename 
Verifies date on the specified file or, if no filename is specified, the next file on tape. 


Xaddress 

Sets a breakpoint at address. If address is omitted, the current location is used. Each break- 
point is assigned a number from 0 to 7. The first breakpoint set is assigned as Breakpoint 0. A 
maximum of eight breakpoints may be set at one time. 


Yn 
Deletes the breakpoint referenced by the n number. If n is omitted, all breakpoints are deleted. 


CET 


Examination Mode Commands 


A ASCII Mode 

B Byte Mode 

M Mnemonic Mode 
W Word Mode 


(The default is M) 


Display Mode Commands 


H Half Symbolic 
N Numeric 

S Symbolic 
(The default is S) 


Numbering System Mode Commands 


Obase Output 
ibase Input 
(Base can be 8, 10, or 16. The default is 16) 


Special Symbols 
address/ 
register/ 


Opens address of register and displays its contents. 
lf address or register is omitted, the last address opened will be reopened. After the contents 
(have been displayed, you may type: 


new value To change the contents. 

To close and enter any change. 

BREAK To close and delete any change. 

GQ) To open next address and enter any change. 

i) To open preceding address. 

address To branch to the address pointed to by the instruction 


beginning at address. If address is omitted, the current 
address is used. 

; To force numeric display mode. 

aa To force numeric and byte modes. 

: To force flags.* 

7 To force ASCII mode. 


address, 
Executes address, if address is omitted, the next instruction is executed. 


expression = 
Calculates expression and displays the results. 


* The colon does not actually have anything to do with the CC (status flag) register. It simply 
interprets the contents of the given address AS IF it contained flag bits. 
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Reference D/ EDTASM Error Messages 


These are error messages you can get while in EDTASM or EDTASMOV: 


BAD BREAKPOINT (ZBUG) 

You are attempting to set a breakpoint (1) greater than 
7, (2) in ROM, (3) at a SWI command, (4) at an address 
where one is already set. 


BAD COMMAND (Editor) 
An illegal command letter was used on the command 
line. 


BAD COMMAND (ZBUG) 
You are not using a ZBUG command. 


BAD FILE DESCRIPTOR (Disk,ZBug) 

The filespec is not in the proper DOS format. See “About 
This Manual” at the beginning of this manual for the 
proper file specification format. 


BAD LABEL (Assembler) 

The symbol you are using is (1) not a legal symbol, (2) 
not terminated with either a space, a tab, or a carriage 
return, (3) has been used with ORG or END, which do 
not allow labels, or (4) longer than six characters. 


BAD MEMORY (Assembler) 

You are attempting to do an in-memory assembly that 
would (1) overwrite system memory (an address lower 
than $1200) (2) overwrite the edit buffer of the symbol 
table, (3) go into the protected area set by USROG, or 
(4) go over the top of RAM. 


If using the /AO switch, check to see that you've in- 
cluded an ORG instruction. When using /MO, check the 
addresses you set for BEGTEMP and USRORG. This 
could also be caused by the data not being stored cor- 
rectly because of some code generated by an in- 
memory assembly. See Chapter 7 for more information. 


BAD MEMORY (ZBUG) 

The data did not store correctly on a memory modifica- 
tion. This error will occur if you try to modify ROM 
addresses or try to store anything beyond MAXMEM. 


BAD OPCODE (Assembler) 
The op code is either not valid or is not terminated with a. 
space, tab, or carriage return. 


BAD OPERAND (Assembler) 

There is some syntax error in the operand field. See 
Section III for the syntax of assembly language instruc- 
tions. 


BAD PARAMETERS (Editor,ZBug) 
Usually this means your command line has a syntax 
error. 


BAD PARAMETERS (ZBUG) 
You have specified a filename that has more than eight 
characters. 


BAD RADIX (ZBUG) 
You have specified a numbering system other than 10, 8 
or 16. 


BUFFER EMPTY (Editor) 
The specified command requires that there be some text 
in the Edit Buffer, and there isn't any. 


BUFFER FULL (Editor) 
There is not enough room in the edit buffer for another 
line of text. 


BYTE OVERFLOW (Assembler) 

There is a field overflow in an 8-bit data quantity in an 
immediate operand, an offset, a short branch, or an FCB 
pseudo op. 


DIRECTORY FULL (Disk) 

The directory does not have enough room for another 
entry. Use another diskette or delete a file (using the 
BASIC KILL commana). 


DISK FULL (Disk) 

The diskette does not have enough room for another file. 
Use another diskette or delete a file (using the BASIC 
KILL command). 


o 
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D/EDTASM ERROR MESSAGES 


DISK WRITE PROTECTED (Disk) 

You are attempting to write to a diskette that has the 
write-protect notch covered. Remove the write-protect 
label or use another diskette. 


DOS ERROR (Disk) 

This indicates an internal DOS error. It usually means 
either the DOS or the Editor/Assembler has been mod- 
ified by the user program with harmful results. 


DP ERROR (Assembler) 

Direct Page error. The high order byte of an operand 
where direct addressing has been forced (,) does not 
match the value set by the most recent SETDP pseudo 


op. 


DRIVE NOT READY (Disk) 
The drive is not connected, powered up, working proper- 
ly, or loaded properly. 


END OF FILE (Disk) 
Your program is attempting to access a record past the 
end of the file. 


ENDC WITHOUT COND (Assembler) 
The pseudo op ENDC was found without a matching 
COND having previously been encountered. 


ENDM WITHOUT MACRO (Assembler) 
The pseudo op ENDM was found without a matching 
MACRO having previously been encountered. 


EXPRESSION ERROR (Assembler and ZBUG) 
Either the syntax for the expression is incorrect (check 
Chapter 9) or the expression is dividing by zero. 


FILE NOT FOUND (Disk) 
The file is not on the disk’s directory. 


FM ERROR (Editor, ZBUG and Disk) 

File Mode Error. The file you are attempting to load is 
not a TEXT file (if in the Editor) or a CODE file (if in 
ZBUG). 


ILLEGAL NESTING (Assembler) 
Illegal nesting conditions include the following: 
1. Nested macro definitions. 
2. Nested macro expansions. 
3. Nested INCLUDE pseudo ops. 
4. INCLUDE nested within a macro definition. 


I/O ERROR (Editor, ZBUG and Disk) 
Input/Output error. A checksum error was encountered 


while loading a file from a cassette tape. The tape may Ww 
be bad, or the volume setting may be wrong. Try a high- 
er volume. 


MACRO FORWARD REFERENCE 

(Assembler) 

A reference to the macro, which is defined on the current 
line, occurs previous to the macro definition. 


MACRO TABLE FULL (Assembler) 
The macro table is full, any additional entries will over- 
write the symbol table. This happens when all memory 
allocated for the edit buffer, macro table, and symbol 
table has been used. Adjust USRORG using the Origin 
(O) command. (See the Chapter 7.) 


MISSING END (Assembler) 
Every assembly language program must have END as 
its last command. 


MISSING INFORMATION (Assembler) 
(1) There is a missing delimiter in an FCC pseudo op or 
(2) there is no label on a SET or EQU pseudo op. 


MISSING OPERAND (Assembler,ZBug) 
The command requires one or more operands. 


MULTIPLY DEFINED SYMBOL (Assembler) | 
Your program has defined the same symbol with differ- Ww 
ent values. If the error occurs in a macro expansion, use 

the /.1 notation to name the symbols. See Chapter 12. 


NO ROOM BETWEEN LINES (Editor) 

There is not enough room between lines to use the in- 
crement specified. Specify a smaller increment or re- 
number (N) the text using a larger increment. Remember 
that the last increment you used is kept until you specify 
a new one. 


NO SUCH LINES (Editor) 
The specified line or lines do not exist. 


REGISTER ERROR (Assembler) 

(1) No registers have been specified with a PSH/PUL 
instruction, (2) a register has been specified more than 
once in a PSH/PUL instruction, or (3) there is a register 
mismatch with an EXG/TFR instruction. 


SEARCH FAILS (Editor) 

The string specified in the Find (F) command could not 
be found in the edit buffer beginning with the line speci- 
fied. If no line is specified the current line is used. 


CES 


o~ 

SYMBOL TABLE OVERFLOW (Assembler) SYNTAX ERROR (Assembler) 

The symbol table is extending past USRORG into the There is a syntax error in a macro dummy argument. 

protected area of user memory. Adjust USRORG using 

the O command. See Chapter 7. UNDEFINED SYMBOL (Assembler,ZBug) 

Your program has not defined the symbol being used. 

co 
oo 
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Reference E/ 
Assembler Pseudo Ops 


Definition of Terms 


symbol 
Any string from one to six characters long, typed in the symbol field. 


expression 
Any expression typed in the operand field. See Reference C, “ZBUG commands,” for a definition of valid expressions. 


COMMANDS PAGES 


DISCUSSED 


COND expression 
f \ Assembles the instructions between COND and ENDC only if expression is true (a non-zero 


value). 
COND SYMBOL 
SYMBOL FCB 1@ 
VALUE FCB 2 
COND SYMBOL-VALUE 


Valid operators for a conditional expression are +, -, /, *. If the expression equals zero, it is 
false; if non-zero, it is true. 


END expression 
Ends the assembly. The optional expression specifies the start address of the program. 


ENDC 
Ends a conditional assembly. 


ENDM 
Ends a macro definition. 


symbol EQU expression 
Equates symbol to an expression. 


SYMBOL EQU $5IBOO 
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E / ASSEMBLER PSEUDO OPS 


symbol FCB expression, ... 
Stores a 1-byte expression beginning at the current address. 


DATAZ2 PuG $33+COUNT 
symbol FCC delimiter string delimiter 


Stores string in memory beginning with the current address. The delimiter can be any 
character. 


TABLE FCC /THIS IS A STRING/ 

symbol FDB expression 

Stores a 2-byte expression in memory begining at the current address. 
DATA FDB $3324 

INCLUDE source filespec 

Includes source filespec in the current position of the source program. 
INCLUDE SAMPLE/ASM 


symbol MACRO 
Defines the instructions between MACRO and ENDM as a macro named symbol. 


DIVIDE MACRO 
OPT switch, ... 
Uses switch to control the listing of macros when assembling the program. The switches are: 
MC List macro calls (default) 
NOMC Do not list macro calls 
MD List macro definitions (default) 
NOMD Do not list macro definitions 
MEX List macro expansionns 
NOMEX Do not list macro expansions (default) 
L Turn on the listing (default) 
NOL Turn off the listing 


ORG expression 
Originates the program at expression address. 


ORG $3F O80 


PAGE 
Ejects the assembly listing to the next page. 


RMB expression 
Reserves expression bytes of memory for data. 
DATA RMB $06 
symbol SET expression 
Sets or resets symbol to expression. 
SYMBOL SET $3500 


CEASE 


SETDP expression 
Sets the direct page to expression. 


Se Lor $20 
TITLE string 
Prints string as the title of each page of the assembly listing. String can be up to 32 
characters. 

Tao Vice Program 1 


CES! 


Reference F/ 
Rom Routines 


This reference lists the indirect addresses where the Color Computer's ROM routines are stored. It also shows the 
entry and exit conditions for each routine. 


The name of the routine is for documentation only. To jump to the routine, you must use its indirect address (the 
address contained in the brackets). 


COMMANDS PAGES 


DISCUSSED 


BLKIN =[$A006| 
Reads a block from a cassette. 
Entry Conditions: 
nn Cassette must be on and in bit sync (see CSRDON). 
CBUFAD contains the buffer address. 
Exit Conditions: 
BLKTYP, located at $7C, contains the block type: 
0=file header 
1 =data 
FF =end of file 
BLKLEN, located at $7D, contains the number of data bytes in the block (0-255): 
Bit Z in the Register CC, Register A, and CSRERR, located at Address $81, contains the 
error: 
Z=1, A=CSRERR =0 (if no errors) 
Z=0, A=CSRERR = 1 (if a checksum error occurs) 
Z=0, A=CSRERR = 2 (if a memory error occurs) 


BLKOUT =[$A008| 
Writes a block to cassette. 
Entry Conditions: 
lf this is the first block write after turning the motor on, the tape should be up to speed 
and a $55s should be written first. 
CBUFAD, located at $7E, contains the buffer address. 
BLKTYP, located at $7C, contains the block type. 
BLKLEN, located at $7D, contains the number of bytes. 
Exit Conditions: 
Interrupts are masked. 
X=CBUFAD + BLKLEN. 
All registers are modified. 
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F /ROM ROUTINES 
—————— eee 


CHROUT = [A002] ad 
Outputs a character to a device. 
Entry Conditions: 
Register A = character to be output 
Address 6F (DEVNUM) = the device (-2 = printer; 0 = screen) 
Exit Conditions: 
Register CC is changed; all others are preserved. 


CSRDON = [$A004] 
Starts the cassette and gets into bit sync for reading. 
Entry Conditions: 
None 
Exit Conditions: 
FIRQ and IRO are masked. 
Registers U and Y are preserved. All others are modified. 


JOYIN = [$A00A] 
Samples the four joystick pots and stores their values in POTVAL through POTVAL+3. 


Left Joystick: 

Up/Down 15A 
Right/Left 158 
Right Joystick: 

Up/Down 15C 
Right/Left 15D 


For Up/Down, the minimum value equals Up. 
For Right/Left, the minimum value equals Left. 


POLCAT = [A000] 
Polls the keyboard for a character. 
Entry Conditions: 
None 
Exit Conditions: 
If no key is seen — Flag Z = 1, Register A = 0 
If a key is seen — Flag Z = O, Register A = key code 
Registers B and X are preserved. 
All other registers are modified. 
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Reference G/ 
DOS Disk Data Control Block (DCB) 


DOS uses a 49-byte DCB to access a disk file. This reference shows the contents of each of 
the bytes (Bytes 0-48) in the DCB. 


Bytes 0-31 


The first 32 bytes of the DCB correspond to the disk file’s 32-byte directory entry. When 
creating a file, DOS writes the DCB’s first 32 bytes to the directory. 


When opening an existing file, DOS searches each directory entry for the filename and exten- 
sion you have set in the DCB. If it finds a match, it overwrites the first 32 bytes of the DCB with 
the 32-byte directory entry. 


When you close the file, DOS overwrites the directory entry with the first 32 bytes of the DCB. 


om Filename (DCBFNM) Bytes 0-7 
Contains the name of the file you want to access. You must set this value. 


Extension (DCBFNM) Bytes 8-10 
Contains the extension of the file you want to access. You must set this value. 


File Type (DCBFTY) Byte 11 
Contains the type of file you want to access. DOS ignores this, but BASIC uses it. You need to 
set this value when creating the file if you want the file compatible with BASIC. 


ASCII Flag (DCBASC) Byte 12 
Contains a flag if the file is in ASCII format. DOS ignores this, but BASIC uses It. You need to 
set this value when creating the file if you want the file compatible with BASIC. 


First Cluster (DCBFCL) Byte 13 
Contains the number of the first cluster in the file. (When you first create a file, this contains 
$FF.) DOS sets this value..Do not change it. 


First Sector Bytes (DCBNLS) Bytes 14-15 
Contains the number of bytes used in the first sector of the file. DOS ignores this. However, to 
be compatible with BASIC files, you should set this value before closing an output file. 


File Mode (DCBCFS) Byte 16 


Contains the mode you specified with Register A in the OPEN, WRITE, or READ routine. DOS 
sets this value. 
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Record Size (DCBRSZ) Bytes 17-18 
Contains the size of each record. Use this with fixed-length records only. You set this value 
before reading from or writing to a direct access file. 


Record Terminator (DCBTRM) Byte 19 
Contains the character that DOS uses to terminate each record. You supply this value when 
reading from or writing to a sequential access file. 


Undefined (DCBUSR) Bytes 20-31 
Contains nothing at present. In future releases, DOS may use part of this. 


Bytes 32 — 48 


Bytes 32-48 are primarily set by DOS. However, you may use the contents of these bytes as 
data in your program. 


The exceptions to this are the bytes for the drive number, physical buffer address, and logical 
buffer address. You must set the contents of these bytes before opening a file. 


Operation Code (DCBOPC) Byte 32 
Contains the last physical I/O operation performed on the file. See your Disk System Manual 
for details. DOS sets this value. 


Drive Number (DCBDRV) Byte 33 
Contains the drive number (0-3 or $FF). $FF tells DOS to use the first available drive and then 
insert the drive number in this segment. You must set this value before opening a file. 


Track Number (DCBTRK) Byte 34 

Contains the number of the last track DOS accessed while doing I/O for this file. DOS sets this 
value. 

Sector Number (DCBSEC) Byte 35 

Contains the number of the last sector DOS accessed while doing 1/O for this file. DOS sets 
this value. 

Physical Buffer Address (DCBBUF) Bytes 36-37 


Contains the start address of a 256-byte physical buffer. The physical buffer is for storing data 
before or after disk I/O. You must set this value before opening a file. 


Error Code (DCBOK) Byte 38 
Contains the same value that the DOS routine returns in Register A: a zero if the last DOS 
routine was successful; the error number if there was an error. DOS sets this value. 


Logical Buffer Address (DCBLRN) Bytes 39-40 
Contains the start address of a logical buffer. The logical buffer is for storing a logical record 
before or after it goes through the physical buffer. You must set this value before opening a 
file, unless you have specified the “share” file mode. (See OPEN.) 


Physical Record Number (DCBPRN). Bytes 41-42 

Contains the number of the physical record currently in the physical buffer. DOS uses this to 
determine whether another physical read or write is required. This contains $FFFF when the 
file is opened. It also contains $FFFF after every read or write when the buffer is “shared.” 
DOS sets this value. 
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Relative Byte Address (DCBRBA) Bytes 43-45 

Contains an address which points to the record you want to read or write (zero when the file is 
first opened). With sequential access, this address always points to the next record. With direct 
access, this address is the product of DCBRSZ times DCBPRN. DOS sets and updates this 
value. 


Logical Record Number (DCBLRN). Bytes 46-47 
Contains the number of the next record to be accessed (zero when the file is first opened). 
Unless you set this value, DOS increments it after accessing each record. 


Modified Data Tag (DCBMDT) Byte 48 

Contains a tag (“1”) if the contents of the physical buffer need to be written to disk. DOS sets 
this tag each time it writes to the logical buffer. The contents of the physical buffer are written 
to disk only when DOS must access a different sector (because the 256-byte buffer is full) or 
close the file. If the physical buffer is “shared,” the physical buffer is written to disk after each 
logical write. DOS sets and updates this value. 


SoC TSE 


Reference H/ 
DOS Routines 


This reference lists all the DOS routines that Radio Shack will continue to provide in future releases. Please note that 
Radio Shack will support only the OPEN, CLOSE, READ, and WRITE routines. The other routines listed in this refer- 
ence will be provided, but not necessarily supported. 


Definition of Terms 


root program 
The portion of the program that is not an overlay. If you are not using overlays, this is the entire program. 


overlay 
A portion of the program that DOS loads into memory only when called. This can be your own overlay (called with 
DOUSR, GOUSR, or LOUSR) or a DOS overlay (called with DO, GO, or LOAD). 


“DOS programming convention 
A convention, which any program using DOS routines must follow: 
@ The execution address must be the first instruction in the program. 
@ The first three bytes of the program must contain a JMP or LBR to any part of the root program. (JMP and LBR are 
both 3-byte instructions.) Example: 


START JMP BEGIN 


@ The next two bytes must contain the length of the root program. If you are not using overlays, this is the entire 
program. Example: 


FDB DONE-START 
e |f you are using overlays, this is the root program. Example: 
FDB DONE-OVY1 


DOS overlay conventions 
A convention, which any of your own overlays must follow: 
@ The first two bytes must contain the size of the overlay. Example: 


OVY 4 FDB OVY2-OVY 1 
@ The next three bytes must contain a JMP or LBRA to any part of the overlay. Example: 
JSR PROV1 


@ The last instruction should be an RTS, GO, or GOUSR. 
e You must assign the overlay a number that is sequential. For example, assign your first overlay the overlay number 
OF 


OWY EQU 1 
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@ The overlay must be written with relocatable (rather than absolute) addresses. When DOS loads the overlay, it sets ad 
Register X equal to the overlay’s base address. Therefore, you can refer to all the local variables as an offset to 


Register X. 


COMMANDS PAGES 
DISCUSSED 


CLOSE =[$602| 
Closes access to a disk file. 
Entry Conditions: 
Register U = the address of the DCB that was previously opened. 
Program must follow DOS programming convention. 

Exit Conditions 
Register A = status code 

Technical Function of CLOSE: 

@ Checks the drive specified by DCBDRV for a directory entry matching DCBFNM and 
DCBFEX. When the entry is found, checks to see if the file was previously open by seeing if 
DCBCFS contains a non-zero value. 

@ Checks DCBMDT for a modification tag. If found, writes the contents of the physical buffer to 
the disk. 

@ Sets DCBCFS to zero. 

e Rewrites the directory entry with the first 32 bytes of the DCB. Any changes in the first 32 
bytes of the DCB after OPEN and before CLOSE are recorded in the directory. 

@ Rewrites the diskette’s FAT. WY 


DO = [$60A] 
Calls a DOS overlay. 
Entry Conditions: 
Register A = DOS overlay number 
Exit Conditions: 
Register A = status code 


DOUSR = [$0610] 
Calls one of your own overlays. 
Entry Conditions: 
Register A = overlay number (the number you have assigned to the overlay) 
Exit Conditions: 
Register A = status code 


GO = [$60C| 
Calls one DOS overlay from another DOS overlay. 
Entry Conditions: 
Register A = DOS overlay number 
Exit Conditions: 
Register A = status code 
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oO 
GOUSR = [$612] 
Calls one overlay from another overlay. For example, OVY1 calls OVY2. 
Entry Conditions: 
Register A = overlay number (the number you have assigned to the overlay) 
Exit Conditions: 
Register A = “O” if no error; error code if error 


LOAD = [$60E] 
Loads a DOS overlay but does not execute it. 
Entry Conditions: 
Register A = DOS overlay number 
Exit Conditions: 
Register A = “0” if no error; error code if error 


LODUSR = [$614] 
Loads one of your overlays but does not execute it. 
Entry Conditions: 
Register A = overlay number (the number you have assigned to the overlay) 
Exit Conditions: 
Register A = “O” if no error; error code if error 


OPEN = [$600] 
Opens access to a disk file using the specified file mode. 
Entry Conditions: 
Register A = file mode 
The file modes are: 
c™ Bit 0 set — allows reads 

Bit 1 set — allows writes 

Bit 2 set — allows file creation 

Bit 3 set — allows extension past end of file 

Bit 4 set — deletes the file when closed (work file) 

Bit 5 set — rewrites the directory’s file allocation table (FAT) only when the file is 
closed. (Otherwise, rewrites FAT after each READ; see the Disk Sys- 
tem Manual for information on the FAT.) 

Bit 6 set — shares the physical and logical buffer 
Bit 7 set — undefined 
Register U = the address where the DCB is stored. 
The DCB must contain values for DCBFNM, DCBFEX, DCBDRV, and DCBBUF 
Program must follow DOS programming conventions. 
Exit Conditions: 
Register A = 0 if no error; error code if error 
Technical Function of OPEN: 
@ Checks the drive specified by DCBDRV for a directory entry matching DCBFNM and 
DCBFEX. 
@ If a match is found: 
e Uses the directory entry to overwrite the first 32 bytes of the DCB 
@ Checks DCBCFS. It indicates a write, create, or extend, the file is opened and Status 
Code L is returned. 
@ Inserts the file mode (contained in Register A) in DCBCFS. 
@ Overwrites the directory entry with the first 32 bytes of the DCB. 
e |f a match is not found and the file mode is “create,” creates a directory entry using the first 
32 bytes of the DCB 
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@ Sets DCBPRN to $FFFF 
@ Clears DCBLRN, DCBMDT, and DCBRBA. 


READ = [$604] 
Reads a record from a disk file. 
Entry Conditions 
Register A = read option 
The read options are: 
Bit O clear — direct access (read by record number; fixed length records) 
Bit 0 set — sequential access (read by terminator character; variable length re- 
cords) 
Bit 1 clear — exit READ pointing to next record 
Bit 1 set — exit READ leaving DCBLRN and DCBRBA the same (not pointing to 
next record) 
The other bits can contain any value. 
Register U = address pointing to the DCB 
Program must follow DOS programming convention 
Exit Conditions: 
Register A = 0 if no error; error number if error logical buffer (pointed to by DCBLRB) 
contains the record 
Technical Function of READ: 
e Checks DCBCFS to see if the file was opened for “read.” 
e Checks DCBRBA for the record you want to access. (If Bit 0 in Register A is clear, READ 
calculates DCBRBA as the product of DCBLRN times DCBRSZ). 
@ Checks to see if the record is in the physical buffer (by comparing the high two bytes of 
DCBRBA with the contents of DCBPRN). 
lf the record is not in the physical buffer, READ reads the record into the physical buffer 
then transfers it to the logical buffer. 
@ Checks to see if Register A’s Bit 1 is set. If so, restore DCBLRN and DCBRBA to their 
Original values. 


RELSE = [$608] 
Frees a physical buffer so that you can use it with another file. 
Entry Conditions: 
Register U = address where the DCB is stored of the file currently using the physical 
buffer. 
Register A = 0 if no error; error code if error. 
Technical Function of RELSE: 
e Check DCBMDT. If the tag is set, the contents of the physical buffer are written to disk and 
DCBMDT is cleared. 
@ Sets DCBPRN to $FFFF. 


WRITE = [$606] 
Writes a logical record to disk. 
Entry Conditions: 
Register A = read/write option 

The read/write options are: 

Bit O clear — direct access (write by record number; fixed length records) 

Bit 0 set — sequential access (write by terminator character; variable length 

records) 
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Bit 1 clear— exit READ pointing to next record 
Bit 1 set — exit READ leaving DCBLRN and DCBRBA the same (not pointing to 
next record) 

The other bits can contain any value. 

Register U = address pointing to the DCB logical buffer (pointed to by DCBLRB) con- 

tains the record you want to write 
Program must follow DOS programming conventions. 
Exit Conditions: 

Register A = 0 if no error; status code if error 

Technical Function of WRITE: 

@ Checks DCBCFS to see if the file was opened for “write.” 

@ Checks DCBRBA for the record you want to access. (If Bit 0 in Register A is off, WRITE 
calculates DCBRBA as the product of DCBLRN times DCBRS2). 

@ Transfers the contents of the logical buffer to the physical buffer. If all 256 bytes of the 
physical buffer are full, writes the contents of the physical buffer to disk. If there is still more 
contents in the logical buffer, WRITE transfer these contents to the physical buffer and sets 
DCBMDT to 1. 

@ If the file mode is “share,” writes the complete contents of the physical buffer to disk regard- 
less of whether it completely fills the sector. Then, sets DCBPRN to $FFFF. 
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Reference I|/ 
DOS Error Codes 


Character 
Displayed 
@ 


D4§ -“ IN<XKS<KCHAHWMDOVOZSrAcC—-TLOMMIOT>FY 


Error 


No errors 

I/O error (drive not ready) 

I/O error (write-protected diskette) 

I/O error (write fault) 

I/O error (Seek error or record not found) 
/O error (CER error) 

I/O error (lost data) 

I/O error (undefined Bit 1) 

I/O error (undefined Bit 0) 

Register argument is invalid 

File directory entry not found 

Full directory 

File was created by the OPEN function 
File not closed after changes 

Attempt to access an opened file 

Attempt to read a read-protected file 

RBA overflow (exceeds 3 bytes -16,777,216) 
Access beyond EOF or extension not allowed 
FAT rewrite error 

Attempt to close an unopened file 

Can't access directly (record size is 0) 
Attempt to write on write-protected diskette 
Can't extend file (disk capacity exceeded) 
Error while loading overlay 

Insufficient print space allocated 

I/O error during BASIC line read 
Program's load address is too low 

First byte of program file is not equal to zero 
Not enough space for buffered keyboard 
Not enough memory 

Output file already exists 

Wrong diskette 
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$0 - $69 
$70-$FF 
$100-$111 
$112-$119 
$11A 
$11B-$159 
$15A-$15D 
$15E-$3FF 
$400-$5FF 
$600-$11FF 
$1200-$3FFF 
$1200-$7FFF 
$8000-$9FFF 
$A000-$BFFF 
$C000-$DFFF 
© $E000-$FEFF 
$FFOO-$FFEE 
$FFFO-$FFFF 
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Memory Map 


Direct page RAM 
System direct page RAM 
Interrupt vectors 

System RAM 

Keyboard alpha lock flag 
System RAM 

Joystick pot values 
System RAM 

Video memory 

DOS 

16K user memory 

32K user memory 
Extended BASIC 

BASIC 

Disk BASIC 

ROM expansion 
Hardware address 
Interrupt vectors 
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Reference K/ 
ASCII Codes 
Video Control Codes 
Color Codes 
0 Black 
1 Green 
2 Yell 
oO 3 Blue 
4 Red 
5 Buff 
6 Cyan 
Fg Magenta 
8 Orange 
Graphic Character 
Codes 
Given the color (1-8) and the pattern (0-15), this formula 
will generate the correct code: 
code = 128 + 16% (color — 1) + pattern 
For example, to print pattern 9 in blue (code 3), type: 
= (= 328 + 1S © tee27 So 


Y CHRS (C) 
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Alphanumeric 
Character Codes 


|< + rR - MRO 
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< 
Be 
? 
@ 
A 
B 
C 
D 
E 
F 
G 
H 
| 
J 
K 
L 
M 
N 
O 
> 
Q 
R 
S 
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“If shifted, the code for these characters are as follows: 
is 92 (hex 5C); CH is 95 (hex 5F); G) is 91 (hex 
5B); @) is 21 (hex 15); and is 93 (hex 5D). 


These are the ASCII codes for lowercase letters. You can 
produce these characters by pressing simul- 
taneously to get into an upper-lowercase mode. The lower- 
case letters will appear on your screen in reversed colors 
(green with a black background). 


a 
b 
C 
d 
e 
f 
9g 
h 
J 
k 
| 
m 
n 
O 
p 
q 
r 
S 
t 
u 
Vv 
w 
Xx 
y 
Z 
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Reference L/ 
6809 Mnemonics 


Definition of Terms 


Source Forms: 


This shows all the possible variations you can use with 
the instruction. Table 4 gives the meaning of all the nota- 
tions we use. The notations in italics represent values 
you can supply. 


For example, the BEQ instruction has two source forms. 
BEQ ad allows you to use these instructions: 
BEQ $08 BEQ $FF BEQ $AQ 


Whereas LBEQ DDDD allows you these: 
LBEQ $FFFF 


Operation: 

This uses shorthand notation to show exactly what the 
instruction does, step by step. The meaning of all the 
codes are also in Jable 4. 


For example, the BEQ operation does this: 


‘lf, (but only if, the zero flag is set, branch to 
the location indicated by the program counter 
plus the value of the 8-bit offset.” 


Condition Codes: 


This shows which of the flags in the CC register are 
affected by the instruction, if any. As you'll note, BEQ 
does not set or clear any of the flags. 


Description: 
This is an overall description, in English, of what the 
instruction does. 


Addressing Mode: 


This tells you which addressing modes you may use with 
the instruction. BEQ allows only the Relative addressing 
mode. 
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ACCA or A 
ACCB or B 
ACCA:ACCB or D 
ACCX 


CCR or CC 
DPR or DP 
EA 

IFF 

IX or X 

lY or Y 
LSN 

M 

MI 

MSN 

PC 

R 

R’ 

TEMP 

xxH 


xxL 


Spors 


Accumulator A. 

Accumulator B. 

Accumulator D. 

Either accumulator A or 
accumulator B. 

Condition code register. 

Direct page register. 

Effective address. 

If and only if. 

Index register X. 

Index register Y. 

Least significant nibble. 

Memory location. 

Memory immediate. 

Most significant nibble. 


| Program counter. 


A register before the operation. 

A register after the operation. 

A temporary storage location. 

Most significant byte of any 
location. 

Least significant byte of any 
location. 

Hardware stack pointer. 


Table 4. Notations and Codes 
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User stack pointer. 

A memory location with immediate, 
direct, extended, and indexed 
addressing modes. 

A read-write-modify argument with 
direct, extended and indexed 
addressing modes. 

The data pointed to by the enclosed 
(16 bit address). 

8-bit branch offset. 

16-bit offset. 

Immediate value follows. 

Hexadecimal value follows. 

Indirection. 

Indicates indexed addressing. 

Is transferred to. 

Boolean AND. 

Boolean OR. 

Boolean Exclusive OR (XOR). 

Boolean NOT. 

Concatination. 

Arithmetic plus. 

Arithmetic minus. 

Arithmetic multiply. 
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Add Accumulator B 
into Index Register X 


Source Form: ABX 
Operation: |X’—IX + ACCB 


Add with Carry into Register 


Source Forms: ADCA P; ADCB P 
Operation: R’-R+M+C 
Condition Codes: 


H — Set if a half-carry is generated; cleared otherwise. 


N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Add Memory into Register 


Source Forms: ADDA P; ADDB P 

Operation: R’-R+M 

Condition Codes: 
H — Set if a half-carry is generated; cleared otherwise. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Add Memory into Register 


Source Form: ADDD P 

Operation: R’-R+M:M+ 1 

Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Logical AND Memory 
into Register 


Source Forms: ANDA P; ANDB P 
Operation: R’R AM 
Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 


into Condition Code Register 


Source Form: ANDCC #xx 
Operation: R’<R A MI 
Condition Codes: Affected according to the operation. 


Arithmetic Shift Left 


Source Forms: ASL Q; ASLA; ASLB 


b7 m bO 
Condition Codes: 
H — Undefined. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Logical AND Immediate Memory 


Condition Codes: Not affected. 

Description: Add the 8-bit unsigned value in accumulator B 
into index register X. : 

Addressing Mode: Inherent. 


V —Set if an overflow is generated; cleared otherwise. 
C — Set if a carry is generated; cleared otherwise. 
Description: Adds the contents of the C (carry) bit and the 
memory byte into an 8-bit accumulator. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


V —Set if an overflow is generated; cleared otherwise. 
C — Set if a carry is generated; cleared otherwise. 
Description: Adds the memory byte into an 8-bit 
accumulator. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


V —Set if an overflow is generated; cleared otherwise. 
C — Set if a carry is generated; cleared otherwise. 
Description: Adds the 16-bit memory value into the 16-bit 
accumulator. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


Z —Set if the result is zero; cleared otherwise. 

V —Always cleared. 

C —Not affected. 
Description: Performs the logical AND operation between 
the contents of an accumulator and the contents of memory 
location M and the result is stored in the accumulator. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


Description: Performs a logical AND between the condition 
code register and the immediate byte specified in the 
instruction and places the result in the condition code 
register. 

Addressing Mode: Immediate. 


V —Loaded with the result of the exclusive OR of bits 
six and seven of the original operand. 
C —Loaded with bit seven of the original operand. 
Description: Shifts all bits of the operand one place to the 
left. Bit zero is loaded with a zero. Bit seven is shifted into 


the C (carry) bit. 
Addressing Modes: Inherent; Extended; Direct; Indexed. 


AND 


ASL 
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Arithmetic Shift Right 


Source Forms: ASR Q:; ASRA; ASRB 


ASK 


Z — Set if the result is zero; cleared otherwise. 


= es C —Loaded with bit zero of the original operand. 


b7 bO Description: Shifts all bits of the operand one place to the 
Condition Codes: right. Bit seven is held constant. Bit zero is shifted into the 
H — Undefined. C (carry) bit. 


N — Set if the result is negative; cleared otherwise. Addressing Modes: Inherent; Extended; Direct; Indexed. 


Branch on Carry Clear Condition Codes: Not affected. 


BCC 


Source Forms: BCC dd; LBCC DDDD Description: Tests the state of the C (carry) bit and causes a 
Operation: branch if it is clear. 
TEMP<—MI Addressing Mode: Relative. 


IFF C=0 then PC’~PC + TEMP Comments: Equivalent to BHS dd; LBHS DDDD. 


R (- — Branch on Carry Set Condition Codes: Not affected. 
Source Forms: BCS dd; LBCS DDDD Description: Tests the state of the C (carry) bit and causes a 
Operation: branch if it is set. 
TEMP+MI Addressing Mode: Relative. 


IFF C=1 then PC’«PC + TEMP Comments: Equivalent to BLO dd; LBLO DDDD. 


Branch on Equal 


BEY 


Source Forms: BEQ dd; LBEQ DDDD Description: Tests the state of the Z (zero) bit and causes a 

Operation: branch if it is set. When used after a subtract or compare 
TEMP<—MI operation, this instruction will branch if the compared values, 
IFF Z=1 then PC’PC + TEMP signed or unsigned, were exactly the same. 

Condition Codes: Not affected. Addressing Mode: Relative. 


R (; = Branch on Greater than Description: Causes a branch if the N (negative) bit and the 
V (overflow) bit are either both set or both clear. That is, 
or Equal to Zero branch if the sign of a valid twos complement result is, or 
Source Forms: BGE ud; LBGE DDDD would be, positive. When used after a subtract or compare 
Operation: operation on twos complement values, this instruction will 
TEMP<—MI branch if the register was greater than or equal to the 
IFF IN @ V]=0 then PC’-PC + TEMP memory operand. 


Condition Codes: Not affected. Addressing Mode: Relative. 


Branch on Greater 
Source Forms: BGT dd; LBGT DDDD 


BGT 


Operation: Z (zero) bit is clear. In other words, branch if the sign of a 
TEMP<—MI valid twos complement result is, or would be, positive and 
IFF Z AIN @ V]=0 then PC’«-PC + TEMP not zero. When used after a subtract or compare operation 

Condition Codes: Not affected. on twos complement values, this instruction will branch if the 

Description: Causes a branch if the N (negative) bit and register was greater than the memory operand. 


V (overflow) bit are either both set or both clear and the Addressing Mode: Relative. 


Branch if Higher 


Source Forms: BHI dd; LBH| DDDD 


BH I 


Operation: subtract or compare operation on unsigned binary values, 
TEMP—MI this instruction will branch if the register was higher than the 
IFF [C v Z]=0 then PC’-PC + TEMP memory operand. 

Condition Codes: Not affected. Addressing Mode: Relative. 

Description: Causes a branch if the previous operation Comments: Generally not useful after INC/DEC, LD/TST, 

caused neither a carry nor a zero result. When used after a and TST/CLR/COM instructions. 
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Branch if Higher or Same 


Source Forms: BHS ad; LBHS DDDD 
Operation: 
TEMP<—MI 
IFF C=0 then PC’«PC+MI 
Condition Codes: Not affected. 
Description: Tests the state of the C (carry) bit and causes a 
branch if it is clear. When used after a subtract or compare 


Bit Test 


Source Form: BIT P 

Operation: TEMP-R AM 

Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Branch on Less than 
or Equal to Zero 


Source Forms: BLE dd; LBLE DDDD 
Operation: 

TEMP<—MI 

IFF Zv{N @ V]=1 then PC’«-PC + TEMP 
Condition Codes: Not affected. 


Branch on Lower 


Source Forms: BLO dd; LBLO DDDD 
Operation: 
TEMP<—MI 
IFF C=1 then PC’ PC + TEMP 
Condition Codes: Not affected. 
Description: Tests the state of the C (carry) bit and causes a 


Branch on Lower or Same 


Source Forms: BLS dd; LBLS DDDD 
Operation: 
TEMP<—MI 
IFF (C vZ)=1 then PC’~PC + TEMP 
Condition Codes: Not affected. 
Description: Causes a branch if the previous operation 


Branch on Less than Zero 


Source Forms: BLT dd; LBLT DDDD 
Operation: 
TEMP<—MI 
IFF IN @ V]=1 then PC’-PC + TEMP 
Condition Codes: Not affected. 
Description: Causes a branch if either, but not both, of the 


Branch on Minus 


Source Forms: BMI dd; LBM| DDDD 
Operation: 
TEMP<—MI 
IFF N=1 then PC’-PC + TEMP 
Condition Codes: Not affected. 
Description: Tests the state of the N (negative) bit and 


on unsigned binary values, this instruction will branch if the 
register was higher than or the same as the memory 
operand. 

Addressing Mode: Relative. 

Comments: This is a duplicate assembly-language 
mnemonic for the single machine instruction BCC. Generally 
not useful after INC/DEC, LD/ST, and TST/CLR/COM 
instructions. 


V —Always cleared. 

C —Not affected. 
Description: Performs the logica! AND of the contents of 
accumulator A or B and the contents of memory location M 
and modifies the condition codes accordingly. The contents 
of accumulator A or B and memory location M are not 
affected. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


Description: Causes a branch if the exclusive OR of the N 
(negative) and V (overflow) bits is 1 or if the Z (zero) bit is 
set. That is, branch if the sign of a valid twos complement 
result is, or would be, negative. When used after a subtract 
or compare operation on twos complement values, this 
instruction will branch if the register was less than or equal 
to the memory operand. 

Addressing Mode: Relative. 


branch if it is set. When used after a subtract or compare on 
unsigned binary values, this instruction will branch if the 
register was lower than the memory operand. 

Addressing Mode: Relative. 

Comments: This is a duplicate assembly-language 
mnemonic for the single machine instruction BCS. Generally 
not useful after INC/DEC, LD/ST, and TST/CLR/COM 
instructions. 


caused either a carry or a zero result. When used after a 
subtract or compare operation on unsigned binary values, 
this instruction will branch if the register was lower than or 
the same as the memory operand. 

Addressing Mode: Relative. 

Comments: Generally not useful after INC/DEC, LD/ST, and 
TST/CLR/COM instructions. 


N (negative) or V (overflow) bits is set. That is, branch if the 
sign of a valid twos complement result is, or would be, 
negative. When used after a subtract or compare operation 
on twos complement binary values, this instruction will 
branch if the register was less than the memory operand. 
Addressing Mode: Relative. 


causes a branch if set. That is, branch if the sign of the twos 
complement result is negative. 

Addressing Mode: Relative. 

Comments: When used after an operation on signed binary 
values, this instruction will branch if the result is minus. It is 
generally preferred to use the LBLT instruction after signed 
operations. 
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SETS 


BHS 


BIT 


BLE 


BLO 


BLS 


BLT 


BMI 


L/6809 MNEMONICS 


BNE 


BPL 


BRA 


BRN 


Bok 


BYC 


BUS 


Oe 


Branch Not Equal 


Source Forms: BNE ad; LBNE DDDD 
Operation: 

TEMP<—MI 

IFF Z=0 then PC’«PC + TEMP 
Condition Codes: Not affected. 


Branch on Plus 


Source Forms: BPL dd; LBPL DDDD 
Operation: 
TEMP<—MI 
IFF N=0 then PC’PC + TEMP 
Condition Codes: Not affected. 
Description: Tests the state of the N (negative) bit and 


Branch Always 


Source Forms: BRA dd; LBRA DDDD 
Operation: 

TEMP<—MI 

PC’+PC + TEMP 


Branch Never 


Source Forms: BRN dd; LBRN DDDD 
Operation: TEMP—MI 
Condition Codes: Not affected. 


Branch to Subroutine 


Source Forms: BSR dd; LBSR DDDD 
Operation: 

TEMP<—MI 

SP’~SP — 1, (SP)—PCL 

SP’~SP — 1, (SP)—PCH 

PC’«PC + TEMP 


Branch on Overflow Clear 


Source Forms: BVC dd; LBVC DDDD 
Operation: 

TEMP<MI 

IFF V=0 then PC’PC + TEMP 
Condition Codes: Not affected. 


BVS Branch on Overflow set 


Source Forms: BVS dd; LBVS DDDD 
Operation: Temp=—MI__IFF V=1 then PC’*-PC+ TEMP 
Condition Codes: Not affected. 


CLR Clear 


Source Forms: CLR Q 
Operation: TEMP@*-M M00 (base 16) 
Condition codes: 

H — Not affected. 

N — Always cleared. 
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Description: Tests the state of the Z (zero) bit and causes a 
branch if it is clear. When used after a subtract or compare 
operation on any binary values, this instruction will branch 

if the register is, or would be, not equal to the memory 
operand. 

Addressing Mode: Relative. 


Causes a branch if it is clear. That is, branch if the sign 

of the twos complement result is positive. 

Addressing Mode: Relative. 

Comments: When used after an operation on signed binary 
values, this instruction will branch if the result (possibly 
invalid) is positive. It is generally preferred to use the BGE 
instruction after signed operations. 


Condition Codes: Not affected. 
Description: Causes an unconditional branch. 
Addressing Mode: Relative. 


Description: Does not cause a branch. This instruction is 
essentially a no operation, but has a bit pattern logically 
related to branch always. 

Addressing Mode: Relative. 


Condition Codes: Not affected. 

Description: The program counter is pushed onto the stack. 
The program counter is then loaded with the sum of the 
program counter and the offset. 

Addressing Mode: Relative. 

Comments: A return from subroutine (RTS) instruction is 
used to reverse this process and must be the last instruction 
executed in a subroutine. 


Description: Tests the state of the V (overflow) bit and 
Causes a branch if it is clear. That is, branch if the twos 
complement result was valid. When used after an operation 
on twos complement binary values, this instruction will 
branch if there was no overflow. 

Addressing Mode: Relative. 


Description: Tests the state of V (overflow) bit and causes 
a branch if it is set. That is, branch if twos complement 
result was invalid. When used after an operation on twos 
complement binary values, this instruction will branch if there 
was an overflow. 

Addressing Mode: Relative. 


Z — Always set. 

V — Always cleared. 

C — Always cleared. 
Description: Accumulator A or B or memory location M is 
loaded with 00000000. Note that the EA is read during this 
operation. 
Addressing Modes: Inherent, Extended, Direct, Indexed. 


Compare Memory from Register 


Source Forms: CMPA P; CMPB P 

Operation: TEMP--R-—M 

Condition Codes: 
H — Undefined. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Compare Memory from Register 


Source Forms: CMPD P; CMPX P; CMPY P; CMPU P; 
CMPS P 
Operation: TEMP—R — M:M + 1 
Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 
V —Set if an overflow is generated; cleared otherwise. 


Complement 


Source Forms: COM Q; COMA; COMB 
Operation: M’-O+M 
Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 
V —Always cleared. 
C — Always set. 


Clear CC bits and Wait 
for Interrupt 


Source Form: CWAI#$xx [E|F[H[1I|N|Z 


Operation: 
CCR<CCR A MI (Possibly clear masks) 
Set E (entire state saved) 


SP’—SP - 1, 
SP’—SP -1, 
SP’—SP - 1, 
SP’—SP —1, 
SP’ SP -1, 
SP’~SP —1, 
SP’ SP —1, 
SP’—SP —1, 
SP’—SP - 1, 
SP’ SP —1, 
SP’-SP - 1, 


(SP)—PCL 
(SP)—PCH 
(SP)—USL 
(SP)—USH 
(SP)HIYL 
(SP)-IYH 
(SP)—IXL 
(SP)—IXH 
(SP)«-DPR 
(SP)-ACCB 
(SP)—ACCA 


SP’SP — 1, (SP)—CCR 
Condition Codes: Affected according to the operation. 


Decimal Addition Adjust 


Source Form: DAA 
Operation: ACCA’~-ACCA + CF (MSN):CF(LSN) 
where CF is a Correction Factor, as follows: the CF for each 
nibble (BCD) digit is determined separately, and is either 
6 or O. 
Least Significant Nibble 
CF(LSN)=6 IFF 1)C=1 
or 2) LSN>9 
Most Significant Nibble 
CF(MSN) =6 IFF 1) C=1 
or 2) MSN>9 
or 3) MSN>8 and LSN>9 
Condition Codes: 
H —Not affected. 


V — Set if an overflow is generated; cleared otherwise. 

C — Set if a borrow is generated; cleared otherwise. 
Description: Compares the contents of memory location 
to the contents of the specified register and sets the 
appropriate condition codes. Neither memory location M nor 
the specified register is modified. The carry flag represents a 
borrow and is set to the inverse of the resulting binary carry. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


C — Set if a borrow is generated; cleared otherwise. 
Description: Compares the 16-bit contents of the 
concatenated memory locations M:M+ 1 to the contents 
of the specified register and sets the appropriate condition 
codes. Neither the memory locations nor the specified 
register is modified unless autoincrement or autodecrement 
are used. The carry flag represents a borrow and is set to 
the inverse of the resulting binary carry. 

Addressing Modes: Immediate; Extended; Direct; Indexed. 


Description: Replaces the contents of memory location M 
or accumulator A or B with its logical complement. When 
operating on unsigned values, only BEQ and BNE branches 
can be expected to behave properly following a COM 
instruction. When operating on twos complement vaiues, 

all signed branches are available. 

Addressing Modes: Inherent; Extended; Direct; Indexed. 


Description: This instruction ANDs an immediate byte with 
the condition code register which may clear the interrupt 
mask bits | and F, stacks the entire machine state on the 
hardware stack and then looks for an interrupt. When a 
non-masked interrupt occurs, no further machine state 
information need be saved before vectoring to the interrupt 
handling routine. This instruction replaced the MC6800 CLI 
WAI sequence, but does not place the buses in a high- 
impedance state. A FIRQ (fast interrupt request) may enter 
its interrupt handler with its entire machine state saved. The 
RTI (return from interrupt) instruction will automatically return 
the entire machine state after testing the E (entire) bit of the 
recovered condition code register. 
Addressing Mode: Immediate. 
Comments: The following immediate values will have the 
following results: 

FF = enable neither 

EF = enable IRQ __ 

BF = enable FIRQ 

AF = enable both 


N — Set if the result is negative; cleared otherwise. 

Z —Set if the result is zero; cleared otherwise. 

V —Undefined. 

C — Set if a carry is generated or if the carry bit was set 

before the operation; cleared otherwise. 

Description: The sequence of a single-byte add instruction 
on accumulator A (either ADDA or ADCA) and a following 
decimal! addition adjust instruction results in a BCD addition 
with an appropriate carry bit. Both values to be added must 
be in proper BCD form (each nibble such that: O<nibble<9). 
Multiple-precision addition must add the carry generated by 
this decimal addition adust into the next higher digit during 
the add operation (ADCA) immediately prior to the next 
decimal addition adjust. 
Addressing Mode: Inherent. 
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DEC 


E OK 


En 


INC 


JMP 


J5ok 


LD 
(8-Bit) 


Decrement 


Source Forms: DEC Q; DECA; DECB C —Not affected. 

Operation: M’—M — 1 Description: Subtract one from the operand. The carry bit 

Condition Codes: is not affected, thus allowing this instruction to be used as 
H —Not affected. a loop counter in multiple-precision computations. When 
N — Set if the result is negative; cleared otherwise. operating on unsigned values, only BEQ and BNE branches 
Z —Set if the result is zero; cleared otherwise. can be expected to behave consistently. When operating on 
V —Set if the original operand was 10000000; cleared twos complement values, all signed branches are available. 

otherwise. Addressing Modes: Inherent; Extended; Direct; Indexed. 


Exclusive OR Z —Set if the result is zero; cleared otherwise. 


Source Forms: EORA P; EORB P V —Always cleared. 
Operation: R’-R@®M C —Not affected. 
Condition Codes: Description: The contents of memory location M is 
H —Not affected. exclusive ORed into an 8-bit register. 
N — Set if the result is negative; cleared otherwise. Addressing Modes: Immediate; Extended; Direct; Indexed. 


Exchange Registers 


Source Form: EXG A7,R2 0010=Y 1010=CCR 
Operation: R1-R2 0011=US 1011=DPR 
Condition Codes: Not affected (unless one of the registers 0100=SP 1100 = Undefined 
is the condition code register). 0101 =PC 1101 =Undefined 
Description: Exchanges data between two designated 0110=Undefined 1110=Undefined 
registers. Bits 3-0 of the postbyte define one register, while 0111 =Undefined 1111=Undefined 
bits 7-4 define the other, as follows: Only like size registers may be exchanged. (8-bit with 

0000 = A:B 1000=A 8-bit or 16-bit with 16-bit.) 

0001 =X 1001=B Addressing Mode: immediate. 


increment C —Not affected. 


Source Forms: INC Q; INCA; INCB Description: Adds to the operand. The carry bit is not 
Operation: M’—M + 1 affected, thus allowing this instruction to be used as a loop 
Condition Codes: counter in multiple-precision computations. When operating 
H —Not affected. on unsigned values, only the BEQ and BNE branches can be 
N — Set if the result is negative; cleared otherwise. expected to behave consistently. When operating on twos 
Z —Set if the result is zero; cleared otherwise. complement values, all signed branches are correctly 
V —Set if the original operand was 01111111; available. 


cleared otherwise. Addressing Modes: Inherent; Extended; Direct; Indexed. 


Jump 


Source Form: JMP EA Description: Program control is transferred to the effective 
Operation: PC’-EA address. ; 
Condition Codes: Not affected. Addressing Modes: Extended; Direct; Indexed. 


Jump to Subroutine Condition Codes: Not affected. 


Source Form: JSR EA Description: Program control is transferred to the effective 
Operation: address after storing the return address on the hardware 
SP’+SP — 1, (SP)—PCL stack. A RTS instruction should be the last executed 
SP’~SP — 1, (SP)—PCH instruction of the subroutine. 
PC’ EA Addressing Modes: Extended; Direct; Indexed. 


Load Register from Memory 


Source Forms: LDA P; LDB P Z — Set if the loaded data is zero; cleared otherwise. 
Operation: R’«-M V —Always cleared. 
Condition Codes: C —Not affected. 
H —Not affected. Description: Loads the contents of memory location M into 
N — Set if the loaded data is negative; cleared the designated register. 
otherwise. Addressing Modes: Immediate; Extended; Direct; Indexed. 
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Load Register from Memory 
Source Forms: LDD P; LDX P; LDY P; LDS P; LDU P 


Operation: R’--M:M +1 
Condition Codes: 
H —Not affected. 
N — Set if the loaded data is negative; cleared 
otherwise. 


Load Effective Address" 


Source Forms: LEAX, LEAY, LEAS, LEAU 
Operation: R’-EA 
Condition Codes: 

H —Not affected. 

N —Not affected. 

Z —LEAX, LEAY: Set if the result is zero; cleared 

otherwise. LEAS, LEAU: Not affected. 

V —Not affected. 

C —Not affected.. 
Description: Calculates the effective address from the index 
addressing mode and places the address in an indexable 
register. 
LEAX and LEAY affect the Z (zero) bit to allow use of 
these registers as counters and for MC6800 INX/DEX 
compatibility. 
LEAU and LEAS do not affect the Z bit to allow cleaning up 
the stack while returning the Z bit as a parameter to a calling 


Logical Shift Left 


Source Forms: LSL Q; LSLA; LSLB 


b7 bO 
Condition Codes: 
H — Undefined. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Logical Shift Right 


Source Forms: LSR Q:; LSRA; LSRB 


b7 bO 
Condition Codes: 
H —Not affected. 


Multiply 


Source Form: MUL 
Operation: ACCA’:ACCB’-ACCA x ACCB 
Condition Codes: 
H —Not affected. 
N —Not affected. 
Z —Set if the result is zero; cleared otherwise. 
V —Not affected. 


LD 


Z —Set if the loaded data is zero; cleared otherwise. 
V —Always cleared. 
C —Not affected. 
Description: Load the contents of the memory location 
M:M + 1 into the designated 16-bit register. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


routine, and also for MC6800 INS/DES compatibility. {| f f’ 
Addressing Mode: Indexed. 

Comments: Due to the order in which effective addresses 

are calculated internally, the LEAX, X+ + and LEAX,X+ do 

not add 2 and 1 (respectively) to the X register; but instead 

leave the X register unchanged. This also applies to the 

Y, U, and S registers. For the expected results, use the 

faster instruction LEAX 2, X and LEAX 1, X. 


Some examples of LEA instruction uses are given in the 
following table. 

Instruction Operation Comment 
LEAX 10,X X+10-X Adds 5-bit constant 10 to X. 
LEAX 500, X X+500-X Adds 16-bit constant 500 to X. 
LEAY A,Y Y+A--+Y Adds 8-bit accumulator to Y. 
LEAY D,Y Y+D-Y ~~ Adds 16-bit D accumulator to Y. 
LEAU -—10,U U-10-~-U  Subtracts 10 from U. 
LEAS -10,S S-—10-S _ Used to reserve area on stack. 
LEAS 10,S S+10-S Used to ‘clean up’ stack. 
LEAX 5,S S+5-xX Transfers as well as adds. 


V —Loaded with the result of the exclusive OR of bits 

six and seven of the original operand. {| — a 
C —Loaded with bit seven of the original operand. 

Description: Shifts all bits of accumulator A or B or memory 

location M one place to the left. Bit zero is loaded with a 

zero. Bit seven of accumulator A or B or memory location M 

is shifted into the C (carry) bit. 

Addressing Modes: Inherent; Extended; Direct; Indexed. 

Comments: This is a duplicate assembly-language 

mnemonic for the single machine instruction ASL. 


N —Always cleared. a - [¥ 


Z —Set if the result is zero; cleared otherwise. 

V —Not affected. 

C —Loaded with bit zero of the original operand. 
Description: Performs a logical shift right on the operand. 
Shifts a zero into bit seven and bit zero into the C (carry) bit. 
Addressing Modes: Inherent; Extended; Direct; Indexed. 


C —Set if ACCB bit 7 of result is set; cleared otherwise. iY {| { 

Description: Multiply the unsigned binary numbers in the 

accumulators and place the result in both accumulators 

(ACCA contains the most-significant byte of the result). 

Unsigned multiply allows multiple-precision operations. 

Addressing Mode: Inherent. 

Comments: The C (carry) bit allows rounding the most- 

significant byte through the sequence: MUL, ADCA #0. 
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Caen reer err 


NEG 


NOP 


Ole 


Ole 


PSHS 


PSHU 


Negate 


Source Forms: NEG Q; NEGA; NEGB 

Operation: M’—O—M 

Condition Codes: 

H — Undefined. 

N — Set if the result is negative; cleared otherwise. 
Z — Set if the result is zero; cleared otherwise. 

V —Set if the original operand was 10000000. 


No Operation 


Source Form: NOP 
Operation: Not affected. 


Inclusive OR Memory 
into Register 


Source Forms: ORA P; ORB P 
Operation: R’-RvM 
Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 


Inclusive OR Memory Immediate 
into Condition Code Register 


Source Form: ORCC #XX 
Operation: R’<R v Ml 
Condition Codes: Affected according to the operation. 


Push Registers on 
the Hardware Stack 


Source Form: 
PSHS register list 
PSHS #LABEL 
Postbyte: 
b7 b6 b5 b4 b3 b2 bi bO 


pc] u | y | x [or] B | A [oc| 


push order — 
Operation: 
IFF b7 of postbyte set, then: SP’-SP — 1, (SP)}PCL 
SP’<~SP — 1, (SP)—PCH 
IFF b6 of postbyte set, then: SP’—SP — 1, (SP)USL 
SP’<~SP — 1, (SP)USH 


Push Registers on 
the User Stack 


Source Form: 
PSHU register list 
PSHU #LABEL 
Postbyte: 
b7 b6 b5 b4 b3 b2 bi bO 


[pc] u | y | x [oP] 8 [ A [cc 


push order — 
Operation: 
IFF b7 of postbyte set, then: US’—US — 1, (US)—PCL 
US’ US — 1, (US)—PCH 
IFF b6 of postbyte set, then: US’—US — 1, (US)SPL 
US’~US — 1, (US)—SPH 
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C — Set if a borrow is generated; cleared otherwise. 
Description: Replaces the operand with its twos 
complement. The C (carry) bit represents a borrow and is set 
to the inverse of the resulting binary carry. Note that 80,, is 
replaced by itself and only in this case is the V (overflow) bit 
set. The value 00,, is also replaced by itself, and only in this 
case is the C (carry) bit cleared. 

Addressing Modes: Inherent; Extended; Direct. 


Condition Codes: This instruction causes only the program 
counter to be incremented. No other registers or memory 
locations are affected. 

Addressing Mode: Inherent. 


Z —Set if the result is zero; cleared otherwise. 

V —Always cleared. 

C —Not affected. 
Description: Performs an inclusive OR operation between 
the contents of accumulator A or B and the contents of 
memory location M and the result is stored in accumulator 
Aor B. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


Description: Performs an inclusive OR operation between 
the contents of the condition code registers and the 
immediate value, and the result is placed in the condition 
code register. This instruction may be used to set interrupt 
masks (disable interrupts) or any other bit(s). 

Addressing Mode: Immediate. 


IFF b5 of postbyte set, then: SP’-SP — 1, (SP)CIYL 

SP’+SP — 1, (SP)-IYH 
IFF b4 of postbyte set, then: SP’—SP — 1, (SP)IXL 

SP’+SP — 1, (SP)<—IXH 

IFF b3 of postbyte set, then: SP’~SP — 1, (SP)-DPR 
IFF b2 of postbyte set, then: SP’~SP — 1, (SP)}-ACCB 
IFF b1 of postbyte set, then: SP’~SP — 1, (SP)-ACCA 
IFF bO of postbyte set, then: SP’~SP — 1, (SP)-CCR 

Condition Codes: Not affected. 

Description: All, some, or none of the processor registers 

are pushed onto the hardware stack (with the exception of 

the hardware stack pointer itself). 

Addressing Mode: Immediate. 

Comments: A single register may be placed on the stack 

with the condition codes set by doing an autodecrement 

store onto the stack (example: STX, — —S). 


IFF b5 of postbyte set, then: US’-US — 1, (US)ClYL 
US’~US — 1, (US)-IYH 
IFF b4 of postbyte set, then: US’-US — 1, (US)IXL 
US’<US — 1, (US)—IXH 
IFF b3 of postbyte set, then: US’«-US — 1, (US)—DPR 
IFF b2 of postbyte set, then: US’-US — 1, (US)-ACCB 
IFF b1 of postbyte set, then: US’-US — 1, (US)—ACCA 
IFF bO of postbyte set, then: US’«-US — 1, (US)-CCR 
Condition Codes: Not affected. 
Description: All, some, or none of the processor registers 
are pushed onto the user stack (with the exception of the 
user stack pointer itself). 
Addressing Mode: Immediate. 
Comments: A single register may be placed on the stack 
with the condition codes set by doing an autodecrement 
store onto the stack (example: STX, — — U). 


a a 


Pull Registers from 
the Hardware Stack 


PULS 


Source Form: IFF bS of postbyte set, then: YH’ <(SP), SP’«SP +1 
PULS register list YL’ =<(SP), SP’-SP + 1 
PULS #LABEL IFF b6 of postbyte set, then: USH’ —(SP), SP’~SP + 1 
Postbyte: USL’ (SP), SP’<SP + 1 
b7 b6 b5 b4 b3 b2 bi IFF b7 of postbyte set, then: PCH’ —(SP), SP’—SP +1 

PCL’ +(SP), SP’<SP + 1 
Poluly] x [oe] 8 | acc Condition Codes: May be pulled from stack; not affected 
«+ pull order otherwise. 

Operation: Description: All, some, or none of the processor registers 
IFF bO of postbyte set, then: CCR’ <(SP), SP’SP +1 are pulled from the hardware stack (with the exception of the 
IFF b1 of postbyte set, then: ACCA’<(SP), SP’«-SP + 1 hardware stack pointer itself). 

IFF b2 of postbyte set, then: ACCB’(SP), SP’«-SP + 1 Addressing Mode: Immediate. 

IFF b3 of postbyte set, then: DPR’ «(SP), SP’SP + 1 Comments: A single register may be pulled from the stack 

IFF b4 of postbyte set, then: IXH’ +(SP), SP’SP + 1 with condition codes set by doing an autoincrement load 
IXL’ +«(SP), SP’<SP + 1 from the stack (example; LDX,S+ +). 


Pull Registers from 
the User Stack 


Source Form: 
PULU register list 


PULU 


IFF b5 of postbyte set, then: YH’ +«(US), US’«US +1 
YL’ +«<(US), US’ US+1 


IFF b6 of postbyte set, then: SPH’ «(US), US’<US + 1 
Aor iNet SPL’ <(US), US’-US+1 
b7 b6 b5 b4 b3 b2 bi IFF b7 of postbyte set, then: icy «(US), Te +1 
PCL’ +(US), US’-US+1 
etal dori Te ed Condition Codes: May be pulled from stack; not affected 
< pull order otherwise. 
Operation: Description: All, some, or none of the processor registers 
IFF bO of postbyte set, then: CCR’ «(US), US’-US +1 are pulled from the user stack (with the exception of the user 
IFF b1 of postbyte set, then: ACCA’«(US), US’-US + 1 stack pointer itself). 
IFF b2 of postbyte set, then: ACCB’«(US), US’US + 1 Addressing Mode: Immediate. 
co IFF b3 of postbyte set, then: DPR’ «(US), US’«US +1 Comments: A single register may be pulled from the stack 
| IFF b4 of postbyte set, then: IXH’ <(US), US’-US +1 with condition codes set by doing an autoincrement load 
IXL’ +(US), US’-US +1 from the stack (example: LDX,U + +). 


Rotate Left 


ROL 


Source Forms: ROL Q; ROLA; ROLB N — Set if the result is negative; cleared otherwise. 
Hs Z —Set if the result is zero; cleared otherwise. 
Operation: V —Loaded with the result of the exclusive OR of bits 


six and seven of the original operand. 
C —Loaded with bit seven of the original operand. 


b7 a bO Description: Rotates all bits of the operand one place left 
Condition Codes: through the C (carry) bit. This is a 9-bit rotation. 
H —Not affected. Addressing Mode: Inherent; Extended; Direct; Indexed. 


Rotate Right 


ROR 


Source Forms: ROR Q; RORA; RORB 
a N — Set if the result is negative; cleared otherwise. 
Operation: Z —Set if the result is zero; cleared otherwise. 
V —Not affected. 
ee C —Loaded with bit zero of the previous operand. 
b7 a bO Description: Rotates all bits of the operand one place right 
Condition Codes: through the C (carry) bit. This is a 9-bit rotation. 
H —Not affected. Addressing Modes: Inherent; Extended; Direct; Indexed. 
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[y T i Return from Interrupt 


Source Form: RT! 
Operation: CCR’ (SP), SP’<-SP + 1, then 
IFF CCR bit E is set, then: ACCA’ (SP), SP’<SP + 1 
ACCB’—(SP), SP’«-SP + 1 
DPR’ «(SP), SP’<SP + 1 
IXH’ +(SP), SP’<SP + 1 
IXL’ +«<(SP), SP’ SP + 1 
IYH’ +(SP), SP’ SP + 1 
IYL’ +«(SP), SP’<SP + 1 
USH’ <(SP), SP’<SP + 1 
USL’ «(SP), SP’<SP + 1 


[ T C Return from Subroutine 


Source Form: RTS 
Operation: 
PCH’«(SP), SP’<-SP + 1 
PCL’(SP), SP’<-SP + 1 


C Ry (- Subtract with Borrow 


Source Forms: SBCA P; SBCB P 

Operation: R’-R-—M-—C 

Condition Codes: 
H — Undefined. 
N — Set if the result is negative; cleared otherwise. 
Z — Set if the result is zero; cleared otherwise. 


S 3 a Sign Extended 


Source Form: SEX 


Operation: 
if bit seven of ACCB is set then ACCA’<FF,, 
else ACCA'+00;, 


Condition Codes: 
H —Not affected. 


ST | Store Register into Memory 
( . ° Source Forms: STA P; STB P 
seek Operation: M’—R 
B 1 t } Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 


C T Store Register into Memory 
‘ Source Forms: STD P; STX P; STY P; STS P; STU P 
( 1 (5 ra BR 1 + } Operation: M’:M+1'-R 
Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 


SUB Subtract Memory from Register 
° Source Forms: SUBA P; SUBB P 
(S=61t) | Sec 
H — Undefined. 


N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 
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PCH’ <(SP), SP’«SP+ 1 
PCL’ «<(SP), SP’+SP+1 
IFF CCR bit E is clear, then: PCH’ «(SP), SP’«-SP + 1 

PCL’ <(SP), SP’«SP + 1 
Condition Codes: Recovered from the stack. 
Description: The saved machine state is recovered from the 
hardware stack and control is returned to the interrupted 
program. If the recovered E (entire) bit is clear, it indicates 
that only a subset of the machine state was saved (return 
address and condition codes) and only that subset is 
recovered. 
Addressing Mode: Inherent. 


Condition Codes: Not affected. 

Description: Program control is returned from the 
subroutine to the calling program. The return address 
is pulled from the stack. 

Addressing Mode: Inherent. 


V —Set if an overflow is generated; cleared otherwise. 

C — Set if a borrow is generated; cleared otherwise. 
Description: Subtracts the contents of memory location M 
and the borrow (in the C (carry) bit) from the contents of the 
designated 8-bit register, and places the result in that 
register. The C bit represents a borrow and is set to the 
inverse of the resulting binary carry. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


N — Set if the result is negative; cleared otherwise. 

Z —Set if the result is zero, cleared otherwise. 

V —Not affected. 

C —Not affected. 
Description: This instruction transforms a twos complement 
8-bit value in accumulator B into a twos complement 16-bit 
value in the D accumulator. 
Addressing Mode: Inherent. 


Z —Set if the result is zero; cleared otherwise. 

V —Always cleared. 

C —Not affected. 
Description: Writes the contents of an 8-bit register into a 
memory location. 
Addressing Modes: Extended; Direct; Indexed. 


Z —Set if the result is zero; cleared otherwise. 

V —Always cleared. 

C —Not affected. 
Description: Writes the contents of a 16-bit register into two 
consecutive memory locations. 
Addressing Modes: Extended; Direct; Indexed. 


V —Set if the overflow is generated; cleared otherwise. 
C —Set if a borrow is generated; cleared otherwise. 
Description: Subtracts the value in memory location M from 
the contents of a designated 8-bit register. The C (carry) bit 
represents a borrow and is set to the inverse of the resulting 
binary carry. 
Addressing Modes: immediate; Extended; Direct; Indexed. 


Source Forms: SUBD P 
Operation: R’-R—-M:M+1 
Condition Codes: 

H —Not affected. 


N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 


Software Interrupt 


Source Form: SWI 
Operation: 


Set E (entire state will be saved) 


SP’—SP — 1, (SP)—PCL 
SP’~SP — 1, (SP)}—PCH 
SP’--SP — 1, (SP)}—USL 
SP’~SP — 1, (SP)—USH 
SP’—SP — 1, (SP)-IYL 
SP’-SP-1, (SP)-IYH 
SP’-SP — 1, (SP)-IXL 
SP’~SP — 1, (SP)—IXH 


Software Interrupt 2 


Source Form: SWI2 
Operation: 

Set E (entire state saved) 
SP’~SP — 1, (SP)—PCL 
SP’~SP — 1, (SP)—PCH 
SP’~SP — 1, (SP)—USL 
SP’~SP — 1, (SP)—USH 
SP’~SP —- 1, (SP)CIYL 
SP’~SP — 1, (SP)—IYH 
SP’+SP — 1, (SP)<IXL 
SP’~SP — 1, (SP)<IXH 


Software Interrupt 3 


Source Form: SWI3 
Operation: 


Set E (entire state will be saved) 


SP’—SP—1, (SP)—PCL 


SP’+SP — 1, (SP)PCH 
SP’<+SP — 1, (SP)—USL 
SP’+SP — 1, (SP)USH 
SP’<SP — 1, (SPJ-IYL 
SP’+SP — 1, (SP)-IYH 
SP’~SP — 1, (SP)—IXL 
SP’+ SP — 1, (SP)—IXH 


Subtract Memory from Register 


V —Set if the overflow is generated; cleared otherwise. 
C — Set if a borrow is generated; cleared otherwise. 
Description: Subtracts the value in memory location 
M:M + 1 from the contents of a designated 16-bit register. 
The C (carry) bit represents a borrow and is set to the 
inverse of the resulting binary carry. 
Addressing Modes: Immediate; Extended; Direct; Indexed. 


SP’«~SP — 1, (SP)—DPR 

SP’+SP — 1, (SP)}-ACCB 

SP’«SP — 1, (SP)-ACCA 

SP’ SP — 1, (SP)«-CCR 

Set |, F (mask interrupts) 

PC’ (FFFA):(FFFB) 
Condition Codes: Not affected. 
Description: All of the processor registers are pushed onto 
the hardware stack (with the exception of the hardware stack 
pointer itself), and control is transferred through the software 
interrupt vector. Both the normal and fast interrupts are 
masked (disabled). 
Addressing Mode: Inherent. 


SP’«SP — 1, (SP)-DPR 

SP’+SP — 1, (SP)ACCB 

SP’~SP — 1, (SP)ACCA 

SP’~SP — 1, (SP)—CCR 

PC’ (FFF4):(FFF5) 
Condition Codes: Not affected. 
Description: All of the processor registers are pushed onto 
the hardware stack (with the exception of the hardware stack 
pointer itself), and control is transferred through the software 
interrupt 2 vector. This interrupt is available to the end user 
and must not be used in packaged software. This interrupt 
does not mask (disable) the normal and fast interrupts. 
Addressing Mode: Inherent. 


SP’«~SP — 1, (SP)—DPR 

SP’+SP — 1, (SP)-ACCB 

SP’«SP — 1, (SP)<-ACCA 

SP’~SP — 1, (SP)-CCR 

PC’ (FFF2):(FFF3) 
Condition Codes: Not affected. 
Description: All of the processor registers are pushed onto 
the hardware stack (with the exception of the hardware stack 
pointer itself), and control is transferred through the software 
interrupt 3 vector. This interrupt does not mask (disable) the 
normal and fast interrupts. 
Addressing Mode: Inherent. 
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SUB 
(16-Bit) 


OW I 


ow Te 


ow I 3 


L/6809S MNEMONICS 


SYNC 


TFR 


Tot 


FIRQ 


Synchronize to External Event 


Source Form: SYNC 

Operation: Stop processing instructions. 

Condition Codes: Not affected. 

Description: When a SYNC instruction is executed, the 
processor enters a synchronizing state, stops processing 
instructions, and waits for an interrupt. When an interrupt 
occurs, the synchronizing state is cleared and processing 
continues. If the interrupt is enabled, and it last three cycles 
or more, the processor will perform the interrupt routine. If 
the interrupt is masked or is shorter than three cycles, the 
processor simply continues to the next instruction. While in 
the synchronizing state, the address and data buses are in 
the high-impedance state. 


This instruction provides software synchronization with a 
hardware process. Consider the following example for high- 
speed acquisition of data: 


Transfer Register to Register 


Source Form: TFR A7, R2 
Operation: R1—R2 
Condition Code: Not affected unless R2 is the condition 
code register. 
Description: Transfers data between two designated 
registers. Bits 7-4 of the postbyte define the source register, 
while bits 3-0 define the destination register, as follows: 
0000 = A:B 1000=A 
0001 = X 1001=B 


Test 


Source Forms: TST Q; TSTA; TSTB 
Operation: TEMP—M —0 
Condition Codes: 
H —Not affected. 
N — Set if the result is negative; cleared otherwise. 
Z —Set if the result is zero; cleared otherwise. 
V —Always cleared. 
C —Not affected. 


Fast Interrupt Request 
(Hardware Interrupt) 


Operation: 
IFF F bit clear, then: SP’—SP — 1. (SP)—PCL 
SP’<~SP — 1, (SP)«-PCH 
Clear E (subset state is saved) 
SP’<~SP — 1, (SP)—CCR 
Set F, | (mask further interrupts) 
PC’ —(FFF6):(FFF7) 
Condition Codes: Not affected. 
Description: A FIRQ (fast interrupt request) with the F (fast 
interrupt request mask) bit clear causes this interrupt 
sequence to occur at the end of the current instruction. The 
program counter and condition code register are pushed 
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SYNC WAIT FOR DATA 

Interrupt! 

LDA DISC DATA FROM DISC AND 
CLEAR INTERRUPT 

STA X+ PUT IN BUFFER 

DECB COUNT IT, DONE? 

BNE FAST GO AGAIN IF NOT. 


The synchronizing state is cleared by any interrupt. Of 
course, enabled interrupts at this point may destroy the data 
transfer and, as such, should represent only emergency 
conditions. 


The same connection used for interrupt-driven I/O service 
may also be used for high-speed data transfers by setting 
the interrupt mask and using the SYNC instruction as the 
above example demonstrates. 

Addressing Mode: Inherent. 


0010=Y 1010=CCR 
0011=US 1011=DPR 
0100=SP 1100 = Undefined 
0101=PC 1101 = Undefined 
0110 =Undefined 1110=Undefined 
0111 =Undefined 1111 = Undefined 


Only like size registers may be transferred. (8-bit to 8-bit, 
or 16-bit to 16-bit.) 
Addressing Mode: Immediate. 


Description: Set the N (negative) and Z (zero) bits according 
to the contents of memory location M, and clear the V 
(overflow) bit. The TST instruction provides only minimum 
information when testing unsigned values; since no unsigned 
value is less than zero, BLO and BLS have no utility. While 
BHI could be used after TST, it provides exactly the same 
control as BNE, which is preferred. The signed branches are 
available. 

Addressing Modes: Inherent; Extended; Direct; Indexed. 
Comments: The MC6800 processor clears the C (carry) bit. 


onto the hardware stack. Program control is transferred 
through the fast interrupt request vector. An RTI (return from 
interrupt) instruction returns the processor to the original 
task. It is possible to enter the fast interrupt request routine 
with the entire machine state saved if the fast interrupt 
request occurs after a clear and wait for interrupt instruction. 
A normal interrupt request has lower priority than the fast 
interrupt request and is prevented from interrupting the 

fast interrupt request routine by automatic setting of the 

| (interrupt request mask) bit. This mask bit could then be 
reset during the interrupt routine if priority was not desired. 
The fast interrupt request allows operations on memory, TST, 
INC, DEC, etc. instructions without the overhead of saving 
the entire machine state on the stack. 

Addressing Mode: Inherent. 


aC OTS 


Interrupt Request 


TRO 


(Hardware Interru pt) Set E (entire state saved) 
Operation: SP’—SP — 1, (SP)—CCR 
IFF | bit clear, then: SP’SP — 1, (SP)}—PCL Set | (mask‘further IRQ interrupts) 

SP’~SP — 1, (SP)—PCH PC’ (FFF8):(FFF9) 
SP’~SP — 1, (SP)—USL. Condition Codes: Not affected. 
SP’+SP — 1, (SP)—USH Description: If the | (interrupt request mask) bit is clear, a 
SP’~SP — 1, (SPJCIYL low level on the IRQ input causes this interrupt sequence to 
SP’~SP — 1, (SP)<IYH occur at the end of the current instruction. Control is 
SP’~SP — 1, (SP)<IXL returned to the interrupted program using a RTI (return from 
SP’~SP — 1, (SP)<IXH interrupt) instruction. A FIRQ (fast interrupt request) may 
SP’~SP — 1, (SP)}—DPR interrupt a normal IRQ (interupt request) routine and be 
SP’~SP — 1, (SP)—ACCB recognized anytime after the interrupt vector is taken. 


SP’~SP — 1, (SP)—ACCA Addressing Mode: Inherent. 


Non-Maskable Interrupt 


NMI 


Set |, F (mask interrupts) 

(Hardware Interrupt) eel obiseratcall 

Operation: Condition Codes: Not affected. ae 
SP’+SP — 1, (SP)—PCL Description: A negative edge on the NMI (non-maskable 
SP’<~SP — 1, (SP)PCH interrupt) input Causes all of the processor's registers 
SP’~SP — 1, (SP)—USL (except the hardware stack pointer) to be pushed onto the 
SP’«SP — 1, (SP)-USH hardware stack, starting at the end of the current instruction. 
SP’-SP — 1, (SP)—IYL Program control is transferred through the NMI vector. 
SP’~SP — 1, (SP)-IYH Successive negative edges on the NMI input will cause 
SP’+SP — 1, (SP)—IXL successive NMI operations. Non-maskable interrupt 
SP’~SP — 1, (SP)—IXH operation can be internally blocked by a RESET operation 
SP’+SP — 1, (SP)«-DPR and any non-maskable interrupt that occurs will be latched. If 
SP’~SP — 1, (SP)}—ACCB this happens, the non-maskable interrupt operation will occur 
SP’~SP — 1, (SP)—ACCA after the first load into the stack pointer (LDS; TFR r,s; EXG 
Set E (entire state save) r,s; etc.) after RESET. 
SP’~SP — 1, (SP)—CCR Addressing Mode: Inherent. 


Restart (Hardware Interrupt) Condition Codes: Not affected. = 7 C Téa ly T 
Operation: Description: The processor is initialized (required after 

CCR’~X1X1XXXX power-on) to start program execution. The starting address 

DPR’+00,, is fetched from the restart vector. 

PC’—(FFFE):(FFFF) Addressing Mode: Extended; Indirect. 
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Reference M/ 
Sample Programs 


Example 1 

ig. ? This is an example of a BASIC Program that calls 

20 ’ an assembly language Program to Paint the screen 

ao yellow. 

4a ° 

60 ° After entering the BASIC program save it on disk. 

70 ’ 

Ba ¢ Run DOS and enter the assembly language Program. 

90 / Use the WD and AD assembler commands to write the 

igo ’ source Program to disk and to assemble it. 

119 * 

1Zz@ “ After returning to BASIC, load the assembled 

tuo Program into memory with the LOADM command. You 
O) 140 : must load the assembled program before the BASIC 

toy. Programs 

i60 ‘° 

oe’ This Program demonstrates how much faster 

i898 ° an assembly program can Perform a function than a 

ine BASIC statement. After you run the Program onces 

200 ° delete lines 1030, 1040, 1050, and 1120. Insert 

210 ° this statement 

220 * 1120 PAINT (1:1) +2 

Z30 * and see how much longer it takes BASIC to Paint 

240 ° the entire screen vellow, 

Zoe * 

1@00 ‘Specify the highest address BASIC can use, This 

igigd ’ Prevents BASIC from using the memory that contains 

ig@Zzo your assembly language subroutine. 

1930 CLEAR 200;16127 

ig40@ PCLEAR 6 ‘paseruve 6 Pages of graphics memory 


1950 DEF USR@=161278 ‘define the subroutine starting address 
1960 ’ The disk drive uses Pages @ and i of video memory, 
1970 ’ You must start at page 2, hex 1200, 


108@ PMODE 3:2 ‘select mode 3+ starting at Page 2 
1090 PCLS ‘clear the screen 

1100 SCREEN 1:0 ‘select graphics screens color set @ 
$110 COLOR 271 ‘set foreground color to blue 

1120 A=USR(O) ‘eall the assembly language subroutine 


1130 ‘draw a frame 
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M/ SAMPLE PROGRAMS 


1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
13190 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 


LINE 
LINE 
PAINT (2:92) +433 

FOR X=50@ TO 9@ STEP 2 
Y=3O0:ST=.5:EN=0 

GOSUB S000 
Y=50:ST=@:EN=.5 

GOSUB S@@@:NEXT & 

FOR 
Y¥=30:ST=.,5:EN=@0 

GOSUB 3000 
Y=5@0:ST=@:EN=.5 

GOSUB S@@@:NEXT X 
Y=40:57T=,25:EN=,75 
GOSUB S5@20 
X=150:GOSUB 3020 
X=100:ST=.75:EN=,.25 
GOSUB 5020 
X=190:GOSUB S320 
PAINT (32:38) +33 
PAINT (162530) +33 
R=6@:H=1:GOSUB 304¢ 
R=37:H=1.7:GOSUB 30490 
R=15:H=4.7:GOSUB 30490 
ST=,5:EN=@ 

FOR X=78 TO 184 STEP 
Y=124:GOSUB 5000 

NEXT xX 

‘draw 
DRAW 


umbrella handle 


Q 


X=16@ TO 18@ STEP 20 


23 


(@+0)-(255+191) »PSET +B 
(IZ si Zi~(2d2 4) 78) +P SE7 320 


‘#3 ]1 in the frame with red 
‘draw torP circles 


: of big cloud 


‘draw bottom circles 
of bigs cloud 


torP circles 
of Littie tioud 
bottom circles 
of littise scisud 

left sides of clouds 


‘draw 


‘draw 


‘draw 


‘draw right sides of clouds 


‘Ps7) tHe SLents As Ween bis 
‘draw the umbrella 

‘draw the spokes of the 

: umbrella 

‘draw the scalloped edges 


on the umbrella 


"BMIZ1»s120jD40iRZ25D25SRZIDZIRBIUZIRS5USSRS5U3 5 


L2sD25L25D25L250253L35UZ5L25U2Z5L25Ud0" 


1440 
145@ 
1460 
1470 
1480 
149@ 
1500 
1510 
1520 
1330 
1340 
1550 
1560 
13570 
1380 
13590 
1600 
1610 
1620 
1630 
1640 
1650 


PAINT 
PAINT 
PAINT 
C=8 
FOR X=68 TO 18@ STEP 
PAINT (X+120)+C+3 
C=C-1:NExXT X 
‘play the song 
GOSUB G@@a:PLAY 
GOSUB 9@@a:PLAY 
PLAY »PLAY 
PLAY *PLAY 
PLAY PLAY 
PLAY PLAY PLAY 
PLAY «PLAY P#:PLAY 
PLAY :GOSUB 98a 
PLAY :PLAY E#:PLAY 
PLAY WH:PLAY XxX 
‘Keep the image on 
Le=INKEY$ 
IF oo? 
END 


(1229122) 9393 
(124,161) +3. 
(1262163) +3 


L$ 

L$ 
:PLAY 
:PLAY 
:PLAY 


THEN 16390 


a4 


"Raindrops Keep Falling On 


N& 
O¢ 
Es 
RS 
ES 


Es 


the screen 


‘paint umbrella handle 


‘set highest color number 
‘paint umbrella panels 


My Head" 


until a Key is Pressed, 
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OOOO 
2010 
220 
2830 
Idd 
~ YS 
2268 
2072 
628 
6G21@ 
6829 
6830 
6040 
6250 
6G26@ 
6070 
608 
6090 
618d 
Gii@ 
6G12¢@ 
6130 
6G14¢ 
615¢@ 
6G1iG@ 
6172 
618@ 
oo 6190 
| 6200 
6210 
6220 
6230 
IPAS 
9010 
9020 
9FB30 
92A2 
9050 


2Z1 88 
20110 
O8120 
00130 
2B148 
OB130 
00160 
22178 
00180 
2019¢ 
BBLAB 
0821 
OB220 


CLRCLE (AsV) 413 +3 4245-45T sEN 


RETURN 
CIRCLE (X+¥)+»16.3+.75,ST,EN 
RETURN 
CIRCLE (1243124) »R131H+.5 +2 
RETURN 


f 


‘These lines define the notes of the song, 
ASG="@BsLd4AsLB.sArL1IGAsL8B. sB-sLiGAsL8.GsLiGFslLd:s+sAQ" 
B$="P8sP4s3sP8sP1G" 
CS="OSsLiGsCsOdslLaCile.sCsli6Csle.sD0sLiscsLe.ic* 
D$="O35L1IGASL4ZASB-sGsFs04s5E5P4" 


E$="P4q" 
F$="Q45L8. $D3LIGCIOIILE, SASLIGESO45L4.E" 
G$="Pg" 


H$="O45L4, 5D" 
I$="O45L4C5L8.5Cs03sLiGA:L8. :B-" 
J$="O45SL16Cs;035L8. :B-sLiGa" 
K$="O45L4,.5C5P4" 
Lé="O3;sL4F5F 5G" 

M$="O3sL25A" 
N$="O045L8,.5Cs035L2G" 
OS="O035L8.5As5L4B-5L4A;3sL4G" 
P$="O035L8.5F sL4A5ld4, 3G" 
QO$="O35L4A5L8.3B-s04sL4D5L4C" 
RS="P8sP16" 
S$="O35sLiGAs04sL8DsL4CsL2c" 
TE="OS3sLiGAsO04sLBEsLa4D3sL2c" 
US="P2sPi" 
VS="O35SL4FsFsGsl2. 5A" 
WE="Q35L8.5F5LiGF:045lL8.sDsLiGC:033LdaF" 
AS="OSsLBAISGsL4FslL2. sF" 

PLAY AS:PLAY B#:PLAY Cs 

PLAY DS:PLAY ES:PLAY FS 

PLAY G#:PLAY H$:PLAY GS 

PLAY I$:PLAY J 

PLAY I$:PLAY K% 

RETURN 


Use EDTASM or EDTASMOY to enter this Program. Save 
the Program on disk with WD command and 
assemble the Program with AD command, Do not 
use the SR switch because this Program is 
called from BASIC; not executed from DOS. 


+ 
* 
% 
* 
¥ 
+ 
* Use the LOADM command to load the assembled code 

¥% into memory before you load the BASIC Program, 
% The ORG statement tells BASIC where in memory 
% to load the Program. 

a 


ORG $3F 00 
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M / SAMPLE PROGRAMS 


00730 * Put the hex code for a vellow Point (S5H) in 
QO2dG register A and the address of the first byte 
OAL3G * of video memory (1200) in register xX. 
Q2O260 * The first byte of video memory is 1200 hex 
20270 * because the disk drive uses memory uP to*that 
Q2OG260 * address, 
22290 * 
22300 START LDA #E55 
GA318 LD #EL SOO 
Q2A320 * 
00330 * Store the yellow dot at the current video memory 
QGAZdG * address and increment X to the next video 
Q2A35Qq * memory address. 
Q22360 +* 
003708 SCREEN STA sX+ 
Q2380 CMPX #$2FFF Is it the end of video memory? 
2V398 BNE SCREEN If nor continue to store dots 
QAAAA Ris If yess exit subprogram and 
Q2Ad1ig * and return to BASIC 
20420 DONE EQU # 
2BA3¢ END START 

Example 2 
70 ’ After entering the BASIC Program save it on disk. 
ae? 
40 ‘ Run DOS and enter the assembly language Program, Use 
oe * the WD and AD assembler commands to write the 
60 ° source Program to disk and to assemble it, 
i So 
80 ° After returning to BASIC: load the assembled 
we Program into memory with the LOADM command. You 
ig@a ° must load the assembled program before the BASIC 
ee Progfrains 
fee 
130 ’ Specify the highest address BASIC can use, TRESS 
140 ° Prevents BASIC from using the memory that contains 
130 ° your assembly language subroutine. 
i6@ CLEAR 200; 16127 
170 DEF USR@=16128 ‘define address of subroutine 
iB? CLS ‘clear the screen 
i190 ’ Print a Prompting message and wait for a response, 
200 INPUT "Press CENTER] when ready"s A& 
2£1@ A=USR(@) ‘call subroutine 
2°O ‘Print another Prompting message and wait for a response 
230 INPUT "Want to do it again": A$% 
40 ‘If operator types yess Start over. Otherwise end, 
250 IF AgS="YES" THEN 2@ ELSE END 
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Oe COCEEDTRASM™! 


= 


20100 
20110 
OB120 
00130 
OB1de 
B15 
00160 
00170 
22188 
2B19¢ 
BB20O 
OB210 
OBL220 
OB230 
OBL40 
OB250 
2B260 
00270 
G0310 
GB32O0 
08330 
GB340 
283530 
22360 
00370 
2B3EO 
GB390 
OB4A00 
2O410 
OBA20 
OBA30 
22440 


% 
% 
% 
* 
¥ 
% 
* 
% 
% 
% 
* 


TART 


Store 


CREEN 


DONE 


Use EDTASM or EDTASMOYV 
disk 


the Program 


assemble the Program 


to enter this Program. Save 
with WD command and 


with AD command, Da wot 


use the SR switch because this Program 15 
called from 


into 


BASIC: 


before 


not executed from DOS, 


Use the LOADM command to load the assembled code 
memory 
The ORG statement tells BASIC 


load the BASIC Program. 
where in memory 


YOu 


to load the Program, 


ORG 


$3F 00 


Put the hex code for a 


red checkerboard in 


register A and the address of the first byte 


of video 


LDA 
LDX 


the 


STA 
LMP A 
BNE 


RTS 


EU 
END 


#EQFO 
#EAGD 


red checkerboard at the current 
memory 
Video 


memory 


(400) in register Ks 


Video 


address and increment K to the next 

memory address. 

Xt 

#EG DS Is it the end of video memory? 

SCREEN If no+ continue to store red 
checKerboards 
If yess exit subprogram and 
and return to BASIC 

& 

START 


129 


© 


SECTION VI 


PROGRAM LISTING 


ONILSI1 


| 7 


SECTION VI 


PROGRAM LISTING 


This section provides a complete source list- 
ing of the DOS program. 


131 


( } PAGE 


@8638 
20642 
A2A650 
B@668 
AG67 28 
28680 
A869 
Q2a72@ 
@a7 18 
QQ7 20 
Qa7 3a 
2274 
@a752 
22762 
@2772 
28782 
Ba7 7A 
2880 
2818 
AGB28 
QQ832 
@2840 
Q28850 
22868 
28872 
QAB3A 
28892 
BAIA 
@@918 
QAaI28 
BAa938 
AG942 
QA958 
BAI60 
2978 
AAS 
2299 
Biaaa 


@1810 
™ Aiazea 
: | 1832 

81048 

@1@5@ 

@1068 

21878 

8188@ 

2189 

@110@ 

21118 

@1iza 

011308 

1142 

@115@ 

i162 

01172 

@118a 

@1198 

G1 2a@ 
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@Biiz 
@@1i13 
@Gii4 
@@1iis 
@Biis 
@@ii7 
@@1iis8 
Q@@119 
AGBi ze 
@@i21 
@@izZ2 
@@iz3 
@@124 
@@iz5 
@Biz6 
Q6127 
G@128 
Q@Biz9 
G0132 
@@i31 
G81 32 
GG133 
@0134 
@@135 
@@136 
22137 
@8138 
A139 
@0140 
@@i41 
QA142 
@G0143 
@@144 
@@145 
@@i4é6 
@@147 
@2148 
A@Bi49 
GB1i58 
@@is1 
Q@Bi5= 
@@i53 
@@154 
@@iS55 
@B@156 
@@i57 
@8i58 
@@i59 
@816a 
@Bi61 
A@B1I62 
@G1653 
A@GB1id64 
@@ié65 
@@iéé6 
Q@A167 
28168 
@@i69 


Aza 


@@iE 
Q@@iF 
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HEHEHE HEE EEE KEE EERE RE EEE EERE KER EE EE EEE EERE 
* ENS TRU Tf ONS 
HEE KEE EEK EE EEE EKER EER ER EERE EER EEE EERE 


# 
¥* 


rR i se 


HEHE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EE EER EEE EEE EEE EEE RE EERE RE EEE EER EEREEE 
* ERROR NUMBERS AND THEIR MEANING 

* (THE EQUATES ARE USED SO THAT ERRORS CAN BE RESEARCHED USING XREF LIST) 
* DEFINITIONS START WITH BASIC LINE NUMBER 256 IN DOS 

HHH EHH EE KEE EEE EKER EEE EEE EE EEE RE EERE EEE EER EEE EEE EERE EEE EERE EERE EERE EEE EEE 


ERR@ 
ERR1 
ERR2 
ERRS 
ERR4 
ERRS 
ERR6 
ERR? 
ERR8 
ERR? 
ERR1@ 
ERRi1i 
ERR1I2 
ERR13 
ERR14 
ERRIS 
ERR16 
ERRi7 


Eu 
EQU 
EGU 
EQU 
EQU 
EQU 
EQuU 
EQu 
EGU 
EQU 
EGU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQuU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EU 
EQU 
EQU 
EQU 
EQU 


OOS PUP Ope & 


226 
Ce 4 
238 
£27 
268 
261 
262 
263 
264 


NO ERRORS 

I/O ERROR — DRIVE NOT READY 

1/0 ERROR — WRITE PROTECTED 

I/O ERROR —- WRITE FAULT 

1/O ERROR -— SEEK ERROR OR RECORD NOT FOUND 
I/O ERROR — CRC ERROR 

I/O ERROR - LOST DATA 

I/O ERROR — UNDEFINED BIT i 

I/O ERROR — UNDEFINED BIT @ 

REGISTER ARGUMENT INVALID 

FILE’S DIRECTORY ENTRY NOT FOUND 

DIRECTORY IS FULL 

FILE WAS CREATED BY "OPEN" FUNCTION 

FILE NOT CLOSED AFTER CHANGES 

ATTEMPTING TO ACCESS AN UNOPENED FILE 
ATTEMPT TO READ — READ PROTECTED 

RBA OVERFLOW (EXCEEDS 3 BYTES - 16:777:216) 
ACCESS BEYOND EOF -— EXTENSION NOT ALLOWED 
FAT REWRITE ERROR 

ATTEMPT TO CLOSE UNOPENED FILE 

CAN’? T ACCESS RANDOMLY - REC SIZE IS ZERO! 
ATTEMPT TO WRITE —- WRITE PROTECTED 

CAN? T EXTEND FILE -— DISK CAPACITY EXCEEDED 
FRROR WHILE LOADING OVERLAY —- FUNCTION NOT PERFORMED 
INSUFFICIENT PRINT SPACE ALLOCATED 

I/O ERROR DURING BASIC LINE READ 


' PROGRAM’S LOAD ADDRESS I5 TOO LOW 


FIRST BYTE OF PROGRAM FILE NOT EQUAL TO ZERO 
SPACE FOR BUFFERED KBD NOT BIG ENOUGH 

NOT ENOUGH MEMORY 

OUTPUT FILE ALREADY EXISTS 

WRONG DISKETTE 


HHH HE KEE EEE EEE EE EE EEE EE EEE EEE EEE KEE EEE EEE ER EEE EEE EEE HEE EEE REE EERE EE EEE 
* DISK DATA CONTROL BLOCK (DCB) FORMAT 


he ee 


PAGE 


Bi1z218 
21220 
G1 238 
01248 
1258 
@1268 
@1z70 
B1i280 
Biz7a 
21388 
@1318 
013208 
81330 
01348 
1350 
21340 
1378 
01380 
01392 
21402 
1418 
21420 
81438 
21448 
1458 
1442 
1478 
21488 
01490 
21580 
@151@ 
21520 
@1538 
21548 
@155@ 
@1i568 
@157@ 
@i58a 
@15970 
21688 
21618 
1620 
01638 
214648 
@165@ 
21662 
016708 
21688 
2149 
17a 
01718 
1720 
0173a 
81748 
21758 
i768 
21778 
21788 
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42172 
0171 
Q@Bi7z 
@@173 
Q@0174 
@@175 
Q@Bi76 
@@177 
22178 
@@i79 
G@188 
Q@@181 
GBiszZ 
Q@@183 
@@184 
@@185 
@@1i86 
Q@@187 
28188 
@@189 
A@Bi7a 
@@i91 
2Big2 
Q@@193 
@Gi94 
@@ai95 
A@Bivs 
@@197 
20198 
Q@G1i99 
ABLAS 
QBO201 
AA2O2 
QAZAS 
BAzA4 
@G2@5 
BAZA6 
@G287 
BO288 
2B209 
QG2128 
Q@@az11 
O@Bz12 
AazZ13 
@@i214 
G@215 
A216 
20217 
QG218 
QBz19 
GA2z28 
QAzZ 

BO222 
BAa223 
QA224 
G@225 
AB2Z26 
A227 


A: 


AAAA 
AAAS 
BAA. 
Q2aGC 
BAAD 
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DOS - INSTRUCTIONS a, 


EEE EEE EEE E EEE EEE EEE KE EEE EEE EEE EEE EEE KE EEE EEE EEE EEE EEE EE EE EE EEE EEE EEE EEE EIEE 
% 
* BYTES CONTENTS 


THESE ITEMS ARE A COPY OF DISK DIRECTORY ENTRY 
a-7 FILENAME 
S-10 FILE EXTENSION 


ij FILE TYPE 
{(@=BASIC PGMs 1=BASIC DATA: 2=MACHINE LANG. PGM:3=TEXT ED. SOURCE) 
3 Be ASCII FLAG (@=BINARY: FF = ASCII FILE) 


13 NUMBER OF FIRST CLUSTER IN FILE 

14-15 NUMBER OF BYTES IN USE IN LAST SECTOR OF FILE 

THESE ITEMS WERE ADDED: USING LAST 16 BYTES OF DIRECTORY ENTRY 
16 CURRENT FILE STATUS 


BIT @ ON ALLOWS READS 

BIT 1 ON ALLOWS WRITES 

BIT 2 ON ALLOWS FILE CREATE IF NON-EXISTANT 

BIT 3 ON ALLOWS FILE EXTENSION BEYOND EOF ON ACCESS ATTEMPTS 

BIT 4 ON MEANS WORK FILE - DELETE FILE WHEN CLOSED 

BIT 5 ON PREVENTS REWRITE OF FAT EVERY TIME A SECTOR IS ADDED TO 


THE FILE. (MINOR POWER FAILURE INCONSISTANCY COULD RESULT) 
BIT & ON MEANS I/O BUFFER IS SHARED. EACH LOGICAL I/0 REQUIRES 
A PHYSICAL I/0 
BIT 7 RESERVED FOR FUTURE OPTION(LIKE RELEASE SPACE WHEN FILE SHORTENED) 
(ALL BITS OFF = FILE CLOSED) 
17-18 LOGICAL RECORD SIZE (AS OF LAST TIME FILE WAS CLOSED) 
ZERO MEANS VARIABLE LENGTH WITH RECORDS TERMINATED BY THE 
DELIMITER STORED BELOW. 
$FFFF MEANS VARIABLE LENGTH WITH FIRST TWO BYTES OF RECORD 
CONTAINING SIZE OF THE REST OF THE RECORD. 
ALL OTHER VALUES MEAN FIXED LENGTH OF SPECIFIED SIZE. 
eS VARIABLE LENGTH RECORD TERMINATOR 
28-31 AT PRESENT: UNUSED PART OF DIRECTORY ENTRY — USE WITH CAUTION. 


THESE ITEMS ARE USED FOR PHYSICAL 1/0 PARAMETERS 
z LAST I/O OPCD 
33 LAST I/O DRIVE 


34 LAST I/O TRACK 

35 LAST I/0 SECTOR a 
36-37 LAST I/0 BUFFER POINTER 
38 LAST I/O RESULT CODE WwW 


THESE ITEMS ARE FOR LOGICAL USE 

39-48 LOGICAL RECORD BUFFER (CAN BE SAME AS DCBBUF IF DCBRSZ=256) 

41-42 LAST I/O PHYSICAL RECORD NUMBER (BEFORE XLATE INTO SECTOR WITHIN 
GRANULE). THIS IS THE RECORD CURRENTLY IN THE BUFFER. 

43-45 CURRENT RELATIVE BYTE ADDRESS (RBA) OF FILE DATA POINTER 

46-47 CURRENT LOGICAL RECORD NUMBER 

48 MODIFIED DATA TAG - SET NON-ZERO WHEN BUFFER CONTENTS CHANGED 


EQUATES FOLLOW FOR MEANINGFUL SOURCE CODE WHEN ACCESSING DCB 
TE: STD DCBLRN;:U SAVE NEW LOGICAL RECORD NUMBER 
(BETTER THAN STD 446;U ) 


eR Oe OR OR OR OR oR OOK OR OK OF OK OR OK OR OK OR Ok OK KR OK OR OK RK OR ok RK OR OK OF OK Ok KOR KK OK OK OK KR OK Ok KK K OK 


DCBFNM EQU Ya} FILE NAME 

DCBFEX EQu 8 FILE NAME EXTENSION 
DCBFTY EQU 11 PILe. TYPE 

DCBASC EQU iz ASCII CODE 

DCBFCL EQu 13 FIRST CLUSTER NUMBER 


c™ PAGE 


@179@ 
g1is8ae 
g1is8ia 
R182 
21830 
21840 
g185e8 
21860 
Q1870 
g18e8e 
21892 
21900 
@1910 
B1920 
01930 
21940 
G1950 
D194 
Q1970 
21980 
B1990 
azana 

2018 
2020 
2030 
2040 
2050 
2060 
2278 
2080 
Q2098 
2100 
Oz110 
O2z120 
Oz138 
O14 
Oz150 
Oz16 
O2172 

f Bz180 
, 2190 
2200 
Q2210 
D222 
2230 
2240 
2250 
226 
QzZ270 
228 
2270 
2300 
Q2310 
2320 
2330 

2340 
Q2350 
2360 
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AGZ28 
G@O229 
@a238 
@G231 
GO232 
AG233 
A@G234 
G@235 
G@B236 
QO237 
Qa238 
BGaZ39 
GG2408 
QA24 1 
BAL42 
A@GB243 
BB244 
ABazZ45 
A246 
GG247 
AGa248 
BB249 
AB258 
A@A25 1 
AB252 
BB253 
@G25 4 
QAa255 
@@B256 
20257 
@a258 
Q8259 
AAZSA 
BAZS1 
BAZb2 
BB263 
ABZ54 
@@265 
BBZ56 
QBB267 
Ga268 
Ba269 
A272 
Q@a27 1 
QG272 
QB273 
Aa 7 4 
G@8275 
GBBz76 
QAa277 
QA278 
QB279 
GU2Z88 
G08 1 
BALB2 
BA283 
BA2B4 
QA285 


rPrPrprrrrrrrrrrrrrrps 


rrRPrrPrprrprprrppp 


rPrPrrrrrrrprrrprrpp 


bY LD 


DOS - INSTRUCTIONS 


DCBNLS EQu 14 NUMBER OF BYTES USED IN LAST SECTOR 
DCBCFS Eau 16 CURRENT FILE STATUS 

DCBRSZ EQuU 1 Bg RECORD SIZE 

DCBTRM EQU i9 VAR LEN RECORD TERMINATOR 

DCBMRB EQU 28 MAX RBA 

DCBUSR EQu Zo USER AREA 

DCBOPC EQU x 4 OPERATION CODE 

DCBDRV EQuU 33 DRIVE 

DCBTRK EQU 34 TRACK 

DCBSEC EQu 35 SECTOR 

DCBBUF Eau 36 1/0 BUFFER ADDRESS 

DCBOK EQu 38 I/O RESULT CODE 

DCBLRB EQU 39 LOGICAL RECORD BUFFER ADDRESS 
DCBPRN EQU 41 PHYSICAL RECORD NUMBER IN BUFFER 
DCBRBA EQU 43 CURRENT RELATIVE BYTE ADDRESS 
DCBLRN EQU 46 CURRENT LOGICAL RECORD NUMBER 
DCBMDT EQU 48 MODIFIED DATA TAG 

DCBSZ EQU DCBMDT+1i SIZE OF DCB (CURRENTLY 5@ BYTES) 


# 

HEHE EEE EE EEE EEE EEE EE EEE EEE EEE EEE EEE EEK EEE EEE 
* EQUATES TO SUPPORT ROUTINES IN ROM OPERATING SYSTEM 
EEE EEE EEE EEE EEE EEE EEE EEE EEK EEE EEE EEE EEE EERE EERE 


POLCAT EQU $A008 

ROLTAB EQU #152 KBD ROLLOVER TABLE 
JOYIN EQU SAGA 

BLKIN EGQU $AQAS 

CSRDON EQU $4004 

WRTLDR EQU $ABOC 

BLKOUT EQU $AQA3 

BLKTYP EQU $7C 

BLKLEN EU $7D 

CBUFAD EQU $7E 

IR® EQU $1ac 

POTS EQU $154 JOYSTICK POT VALUES 
ALPHLK EQU $11A KBD RTN’S ALPHA LOCK SWITCH 


¥ 

HEE EEE EEE EEE EEE EEE EEE EEE HERE 
* EQUATES TO XREF USE OF PIA’S 
EEK EEE EERE EE EEE EERE EEE EERE 


U4ACR Eu $FF21 CONTROL REG 
U4ADR EQu $F F 22 DATA REG 
U4ADD EQu $FF2Q DATA DIRECTION REG 
U4BCR Eu $FF23 

U4BDR EQU $FF 22 

U4BDD EU $F P22 

UBACR EQuU $FFQ1 

USADR EQu $F FAQ 

UBADD EQuU $FF QQ 

USBBCR EQU $F FOS 

UBBDR EQU $FFQ2 

WBBDD Eau $F FO 

¥ 

* MISC ADDITIONAL EQUATES 

ENABLE EQU %Z00118181 

DSABLE Eau %0@81181808 

* COLOR VALUES 

BUFF EQU ABAAAWWVS 

CYAN EQU %@1@818101 


CE 


PAGE @@4 Doc »-5A:8 DOS —- INSTRUCTIONS i, 
82378 @8296 BAAA A MGNTA EQU *%181801@818 
2388 @@287 QQFF A ORANGE EQU pRB EEE So | 
22390 @8288 @aaa A GREEN Eau “AOBBAGAAG 
O2408 @8289 @@55 A YELLOW Eau 401818181 
@2418 80298 QAaAA A BLUE EQU *%1G1B1BisB 
Q2420 88291 Q@FF A RED EQu @iAATZi iti 
24380 @@292 * CODES RETURNED BY POLCAT FOR FUNCTION KEYS 
024480 @@293 Q@S5E A UP EQU $5E UP ARROW 
@2458 @@2974 GaAA A DOWN EQU $BA DOWN ARROW 
2468 @@295 AAP A RIGHT E@QU $89 RIGHT ARROW 
22478 @B296 AAS A LEFT EQu $08 LEFT ARROW 
2488 @8297 @@SF A SUP EQu $5F SHIFT UP ARROW 
224928 @@298 @@SB A SDOWN EGU $5B SHIFT DOWN ARROW 
QO2508 @0299 @A5D A SRIGHT EQU $5D SHIFT RIGHT ARROW 
G2518 @830a @@i5 A SLEFT EQU $15 SHIFT LEFT ARROW 
O25280 @@381 AGaS A BREAK EQU $43 BREAK KEY 
22530 @@302 QAaaC A CLEAR EQU $OC CLEAR KEY 
2548 88383 BaS5C A SCLEAR EQU $5C SHIFTED CLEAR 
@2558 B@304 ABAD A ENTER EQU $@D ENTER KEY 
22562 @@305 2248 A AT EQu $408 “a KEY 
82578 28386 A2Gi3 A SAT EQU $13 SHIFTED “a* KEY 
Q@2588 88387 * 
22598 883208 HERE EEE EEE EEE EE EE REE EEE REE EE EEE EERE EEE ER EER EEE RHEE EK EEE 
2608 88389 * DOS MACRO AN D Leo tlt CAL E@UATES 
22618 @831a EERE EEE EEE EEE EE EE EEE EE EEE ERE EEE EEE EEE EE EHR EE KER EE EE KEK EEE 
22628 @@31i1 DOS MACR CALL A DOS FUNCTION 
@@31z2 £630 LDA #\1 OPTION 
G@313 2640 JSR C\@] INDIRECT FUNCTION ADDR 
20314 2658 ENDM 
02668 @@315 * 
@2670 @@316 * EQUATES USED WITH DOS MACRO 
@2680 @@317 * 
02690 @0318 * THE FOLLOWING USED WITH "OPEN" 
82708 @@319 A608 A OPEN EQuU $608 OPEN FUNCTION 
@2718 @@328 Q2A04 A CREATE EQU 4 ALLOWS FILE CREATION ON OPEN IF NOT FOUND 
@27280 B@321 2088 A EXTEND EQU 8 ALLOWS EXTENSION OF FILE TO POINT OF ACCESS 
02738 @@322 QAGQi A INPUT EQ@uU 2 USED TO SIGNIFY THAT READS ARE ALLOWED 
@2748 @@323 AA i A IN Eau 1 SHORTER FORM OF ABOVE 
Q@2758 @0324 Gaz A OUT EQU = ALLOWS WRITES 7 
@2768 @8325 Q@QE A OUTPUT Eau CREATE+EXTEND+OUT USUAL COMBINATION FOR OUTPUT FILES , 
02778 @2326 G81 A WORK EQu 16 CAUSES FILE TO BE KILLED WHEN CLOSED (WORK FILE) 
@2788 @@327 a2 A FAST EGU 4 MINIMIZES FAT REWRITES 
02798 @@328 2040 A SHARE EQuU 64 USED WHEN 2 OR MORE FILES SHARE THE SAME 1/0 BUFFER 
22800 88329 * EXAMPLES: 


22810 @@33@ 
@2820 @B331 
2838 @@332 
2848 @@333 
Q@2850 @0334 
22868 @@335 
228728 @@336 
@2880 @2337 
22890 00338 
@2988@ 82339 
22918 283408 
G2928 22341 
22938 88342 
22948 88343 


DOS OPEN INPUT TO READ AN EXISTING FILE 

DOS OPEN OUTPUT TO CREATE & EXTEND AN OUTPUT FILE 

DOS OPEN IN+OUT TO UPDATE AN EXISTING FILE (NO EXTENSIONS) 

DOS OPEN INPUT+OUTPUT+WORK TO CREATEs EXTEND: READ & WRITE AND KILL 

WHEN CLOSED (A WORK FILE) 

"SHARE" CAN BE ADDED TO ANY OF THE ABOVE EXAMPLES IF 2 OR MORE FILES 
WILL BE USING THE SAME I/O BUFFER AT THE SAME TIME. THIS OPTION CAUSES 
A PHYSICAL [70 TO REFRESH THE BUFFER WITH EVERY LOGICAL I/0 OPERATION. 
WITHOUT THIS OPTION: SEVERAL LOGICAL READS OR WRITES TO OR FROM THE 
SAME PHYSICAL SECTOR CAN BE DONE WITH A SINGLE PHYSICAL I/0. "SHARE" 
INCREASES THE AMOUNT OF ACTUAL I/O ACTIVITYs BUT ALLOWS USE OF MANY 
FILES AT THE SAME TIME WITH MUCH LESS MEMORY REQUIREMENTS FOR BUFFERS. 


* OR OK KK KK KR KR Kk OK 


VSED WITH "CLOSE" FUNCTION 
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02950 
02960 
O2972 
az980 
O2990 
3000 
3010 
3020 
23030 
03042 
3052 
03060 
3072 
3080 
23098 
03100 
@3110 
Q3120 
@3130 
03140 
@3152 
03162 
03172 
03180 
3192 
O32 
@3z12 
Q3z20 
3230 
3242 
3250 
03268 
3278 
3280 
3292 
3320 
3312 
3322 
3332 
03340 
32358 
03362 
3378 
03382 
3392 
03400 
3410 
03420 
03430 
03442 
03450 
03460 
3472 
03482 
03492 
3590 
3512 
Q3520 


@Q27 pac 


G8344 
G0345 
BA346 
@0347 
20348 
@Q349 
BAa358 
@@35 1 
GBA352 
@0353 
@G354 
QB355 
@@356 
G@@357 
@@358 
@8359 
A368 
GG361 
AA362 
Q8363 
BB364 
Q@Q365 
GA366 
QB367 
G2368 
QB369 
@2373 
Q@B371 
GA372 
Q@0373 
AG374 
Q@8375 
GAa376 
20377 
@2378 
QAa379 
AA380 
Q@2381 
BA332 
Q0383 
@28384 
Q28385 
20386 
@0387 
8388 
BA389 
@8398 
BA391 
BA392 
Q2393 
QQ394 
AA395 
BA396 
BQ397 
Q2398 
BA399 
22408 
O20401 


»~5A:8 


D602 
2000 


504 
B406 
AAG i 
altel Pal a} 
AAA 
Q2G0= 
AAAS 


B408 


BSQA 
BSc 
Q6GE 


@aai 


@QQE 


BABA 


bb 
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>PrDp 


DOS —- INSTRUCTIONS 


CLOSE A FILE OPTIONS NOT USED 


TO CLOSE A FILE 


AND 


"WRITE" FUNCTIONS 

READ A RECORD 

WRITE A RECORD 

TO READ USING REL BYTE ADDR 


TO PREVENT ADVANCING REC NBR OR RBA AFTER A READ 
1 = ENSURE I/O BUFFER IS WRITTEN TO DISK AFTER LOGICAL WRITE 


TO RANDOMLY READ BY RECORD NUMBER 
(FIXED LENGTH RECS ONLY) 
{USE THIS FOR NORMAL SEQUENTIAL READ OF FIXED LENGTH) 
TO READ THE RECORD POINTED AT BY RBA 
{REQUIRED IF USING VARIABLE LENGTH RECORDS) 
TO READ BY REC NBR WITHOUT ADVANCING REC NBR 


READ: RBA+UPDATE TO READ THE RECORD POINTED AT BY RBA & NOT CHANGE RBA 


CLOSE EQU $602 
hy EQU @ 

* EXAMPLE: 

* DOS CLOSE: IT 

% 

* USED WITH "READ" 
READ EQU $604 
WRITE EQU $406 
RBA EQuU i 
RECORD EQu @ 
REC EU @ 
UPDATE EQu z 
NOW EQU 8 

* EXAMPLES: 

* DOS READs RECORD 
* 

% 

* DOS READ: RBA 

¥ 

* DOS READ: UPDATE 
* DOS 

* DOS WRITE:REC 

* DOS WRITE: RBA 

* DOS WRITE: UPDATE 
¥ 

* DOS WRITEs RBA+NOW 
*% 


RELSE 


EQU 


$628 


WRITE VIA RECORD NUMBER (FIXED LENGTH ONLY) 
WRITE FIXED OR VARIABLE RECORD 
UNLIKELY OPTION -— WRITES RECORD BUT DOES NOT CHANGE 
RBA OR REC NUMBER. COULD BE REWRITTEN AGAIN. 
SAME AS: DOS WRITE: RBA FOLLOWED BY DOS RELSEs IT 


USE TO RELEASE 1/790 BUFFER WITHOUT CLOSING FILE 


* IF CONTENTS OF BUFFER HAVE BEEN CHANGED: IT IS REWRITTEN. THEN DCBPRN 
* IS SET TO $FFFF 
* USE THIS FUNCTION WHEN USER IS CONTROLLING A SHARED BUFFER. 
* EXAMPLE: 
* DOS RELSE;s IT 


* 


TO ENSURE A PHYSICAL 1/0 BEFORE THE NEXT LOGICAL I/0. 


* USED WITH OVERLAYABLE FUNCTIONS 


$4BA 
$408C 
$460E 


USE TO LOAD IF NECESSARY: THEN EXECUTE AN OVERLAY 
USE TO XFER CONTROL FROM ONE OVERLAY TO ANOTHER IN SAME AREA 
USE TO LOAD A SYSTEM OVERLAY - IT IS LOADED AT THE 


* THE FOLLOWING USED WITH "LOAD" AND "DO" FUNCTIONS 


DO EQU 

GO EQu 
LOAD EQu 

* EXAMPLE: 

* DOS DO;sMAP 
* 

INIT EQu 

* EXAMPLE: 


i 


INITIALIZATION OF DOS 


* DOS DOs INIT EXIT PROGRAM & RE-INITIALIZE DOS 
* NOTE: STACK AND OLYLOC SHOULD BE RESET BEFORE USING THIS OVERLAY 


* 
MENU 


* 


LDS 


STD 
DOS 


* eK oe 


MAP 


EQuU 


EXAMPLE: 


#STACK 


POLYLOC 
DOs MENU 


EQu 


* EXAMPLE: 
* LDD #280 FIRST LINE NUMBER TO BE DISPLAYED 
* LDY #283 LAST LINE TO BE DISPLAYED 


14 


if 


DISPLAY DOS MAIN MENU 


LDD #OVRLAY WHERE OVERLAY AREA SHOULD START 


DISPLAY BASIC LINES 


_ CTS 
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3538 28402 * LDU <CURSOR STARTING DISPLAY ADDRESS 

Q3548 @0483 % (IF STARTING ADDR IS ZERO: SCREEN WILL BE CLEARED FIRST AND ROUTINE 
23558 @0404 * WILL EXIT WITH U->FIRST CHAR AFTER FIRST LEFT BRACKET ON SCREEN) 
Q@356@ @@405 * PSHS DsY¥:U (PARAMETERS ARE PASSED IN THE STACK) 

23578 @2406 * DOS DO; BASMSG 

@358Q 80407 * PULS DsY¥sU NORMALIZE STACK 

@3598 80488 * BNE ERROR BRANCH ON ANY FAILURE IF DESIRED 

Q3620 @0409 * 

23610 00410 AaAA= A RUNIP EGU z KEYIN A NAME AND RUN PGM 

B36280 @@411 * EXAMPLE: 

Q36380 80412 * DOS DOsRUNIP 

@3640 @0413 * 

83658 @0414 @2@05 A CPYFLE EQU a GET INFO FROM USER & COPY A FILE 

83668 @@415 * EXAMPLE: 

@3670 @0416 * DOS DOsCPYFLE (IF "GO" USEDs DOS MENU FOLLOWS COPY FUNCTION) 

23680 @0417 ¥ 

23692 00418 GAGE. A FIELDI EQU 11 INPUT A MAPPED FIELD 

@3708 00419 * EXAMPLE: 

03718 80420 * LDX DEST WHERE THE DATA GOES IN MEMORY 

@3720 @0421 * LDU FLDADR POINT TO FIELD ON SCREEN 

03732 @@422 * DOS DOsFIELDI INPUTS THE FIELD 

@3748 @@42 * B IS RETURNED CONTAINING LAST KEYSTROKE ENTERED 

Q@3758 00424 * 

03760 @@425 A2@AC A EXEC EQU 12 GIVEN USRDCB CONTENTS: LOAD ROOT & EXECUTE PROGRAM 
@3778 @Q426 * EXAMPLE: 

23782 @0427 * (WHATEVER LOGIC TO PUT NAME IN DCB AT "USRDCB") 

23798 @0428 * DOS GOsEXEC JUMP TO LOAD & EXECUTE OVERLAY 

Q3800 @0429 % 

23818 80438 @@aD A REALTM E@QU 13 CLOCK DISPLAY OVERLAY (SEE SKEL FOR EXAMPLE OF USE) 
@3820 80431 * 

Q38380 80432 Q@Qar A BUFPRT E@QU i5 BUFFERED PRINT OVERLAY 

23840 @0433 * EXAMPLE: 

23858 @0434 * LDU #5I1ZE (TOTAL MEMORY TO BE USED (ROUTINE + BUFFER) 

23860 @@435 * (ROUTINE IS ABOUT 220 BYTES) 

23878 80436 * DOS DO:BUFPRT (SETS IT UP - OVERLAY & BUFFER PROTECTED FROM 

23880 00437 * BEING OVERLAYED). 

@3898 00438 * FROM THIS POINT ONs CHARACTERS PRINTED BY CALLING "PRNT" WILL GO 

23920 20439 *® THROUGH BUFFERED I70. TO WRAP UP AT EQJs DO THIS: 

23918 @0440 * CLRA = 
23920 20441 * JSR CPRNTJ] REQUEST TO END BUFFERING. 
23938 @0442 * THIS WILL CAUSE "PRNT" TO WAIT UNTIL THE BUFFER IS EMPTIED (PRINTER WW 
23948 00443 * HAS CAUGHT UP): AND THEN OVERLAY AND BUFFER AREA ARE RELEASED. 

23958 @0444 * 

23760 @@445 Q@@ii A COPY EQu 17 COPY A FILE 

23978 08446 * GIVEN: 

23982 00447 * U-?>SOURCE FILE DCB (NOT OPENED) 

Q3998@ @8@448 * Y->DEST FILE DCB (NOT OPENED) 

24200 80449 * B (BIT @) — OFF IF NO DISKETTE SWAPPING: ON FOR DISKETTE SWAPPING 
24018 @0458 * RETURNED A=ERROR NUMBER 

G4020 @0451 * 

24038 @@452 * SIMILAR FUNCTIONS FOR USING USER OVERLAYS 

24040 @0453 612 A DOUSR EQU $610 LOAD IF NECESSARY & EXECUTE USER OVERLAY 

24058 @@454 @61iz A GOUSR EGQU $612 JUMP TO A&A DIFFERENT OVERLAY 

04062 @@455 B6514 A LODUSR E@QU $514 LOAD USER OVERLAY 

@4078 80456 * USER SHOULD PROVIDE EQUATES FOR HIS OVERLAYS HERE 

24880 88457 * 

24092 @@458 @616 A ERROR EQU $616 JSR HERE FOR DISPLAY OF ERR MSG 

241822 @0459 * 


CE TSM 


PAGE @@9 Doc ~-5A:8 DOS — INSTRUCTIONS 
04110 08448 4618 A TIME EQU $418 TURN ON/OFF TIME ROUTINE 
44120 00441 BOQ1 A ON EQU 1 
@413@8@ @8462 AABA A OFF EQU @ 
04148 €@04463 * EXAMPLE: 
04150 @8444 * LDU #TMERTN LOAD ADDR OF ROUTINE 
04140 004645 * DOS TIME:ON GO ACTIVATE THIS ROUTINE 
04178 @@466 % 
04180 00447 @61iAé A PRNT EQU $514 PRINT A CHARACTER ON PRINTER 
@419@ @84468 * THIS IS CHANGED BY CALLING BUFFERED PRINTER OVERLAY TO POINT 
@4200 02449 * AT BUFFERED IO ROUTINE 
4214 020478 * 
Q4220 00471 @61C A KEYIN E@QU $51C POLL KEYBOARD FOR INPUT CHARACTER 
04230 08472 * THIS IS CHANGED BY CALLING BUFFERED KEYBOARD OVERLAY TO POINT 
04248 08473 * AT BUFFERED IO ROUTINE 
@4250 02474 * 
04268 00475 Q@S1E & BASIC EGU $51E JMP HERE TO RETURN TO BASIC 
O4278 @0476 ¥ 
Q@428Q 00477 KEELE KEE HEHEHE EEE EEK ERE R EEE EEE EERE REE EE EER ERE REE 
04298 080478 * OTHER USE Fr Ut MACROS FOLLOW 
24300 @8479 EEE HEE KR EEE HEHEHE KEE HEHE EERE KR EEE HERE EERE EH 
44318 @8@48@ ENABLI MACR ENABLE INTERUPTS 
@20481 4320 ANDCC #%111601111 
AGA482 433@ ENDM 
04340 @@483 * 
Q@4350 @8@484 DSABLI MACR DISABLE INTERUPTS 
@8@485 4368 ORCC #401010000 
@0486 437@ ENDM 
024380 00487 * 
04398 28488 NEGD MACR NEGATE D 
AA489 4400 COMA 
20498 441@ COMB 
A049 1 4420 ADDD #1 
QA492 4438 ENDM 
04440 80493 * 
04458 20494 LSRD MACR LOGICAL SHIFT RIGHT D 
BA495 446@ LSRA 
Q2Q49& 447@ RORB 
QB0497 4489 ENDM 
om 04498 88498 * 
' O458@ @@499 LSLD MACR LOGICAL SHIFT LEFT D 
G22500 451@ LSLB 
A254 4528 ROLA 
Ga502 4530 ENDM 
04540 @@5a3 oa 
44550 @@504 CLRD MACR CLEAR D 
40505 4560 CLRA 
2a5aé 457@ CLRB 
48507 458@ ENDM 
04598 @05a8 * 
424408 @a5a9 INCD MACR ADD 1 TO D 
@@51a 451@ ADDD #1 
Q@@51i1i 4520 ENDM 
04630 @@512 ¥ 
046480 00513 HEL KERR EEK EE KEELE KEE RE RE KEE KE EER EERE RENE EE HE EER EER EERE KREMER KEE KE EE 
04650 @@514 *SoY¥Y 8&8 F 2 6 RAM ~ yO. S 
444640 @@515 HEE ERE HEE EERE HEE EK EKER EEE RHE REE EEE HEE EEE EEE REE EERE EKER EEE REE ER EEE 
046708 02516 * ADDITIONAL WS USING EXTENDED ADDRESSING 
0468@ @@517A @B15E ORG $1i5E 
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24698 
247082 
04718 
04728 
04738 
04742 
24752 
24762 
04772 
04788 
84798 
24898 
248108 
O4828 
04830 
24848 
@4850 
04862 
84872 
B4882 
4890 
024902 
G4912 
04928 
04938 
04948 
84958 
04968 
84978 
04988 
84992 
B50aG 
@501@ 
Q5020 
Q5038 
25042 
@5852 
@5262 
@507@ 
Q5082 
@52890 
5120 
@5112 
@35122 
05138 
05142 
Q5158 
05160 
05172 
28012 
QBW28 
28032 
22B4A 
28052 
22B60 
28072 
2282 
22098 


@1i@ poc 


Q2B5iBA 
@@519 
GAS Z0A 
@O521 
G@O522 
G@523 
Q@AS524 
G@525 
Q@O526 
Q@527 
@0528 
@a529 
Q2@538 
BA531 
GOS 32 
GG533 
225334 
Q@@535 
@@536 
G5 37A 
Q@A538A 
BAS39A 
@O548A 
ZAS54iA 
QA5424 
BAS5434 
25444 
Q@B545A 
@B546A 
Q@Q2547A 
@@54B8A 
GQ5494 
BOS5BA 
BA@S51A 
@@552 
BOS553A 
QO554A 
BO555A 
QBS56A 
@@557 
BBS58A4 
Q@Qa557A 
2256 
B@A561A 
ZA562 
20563 
Q2O564 
@@565 
BAS66A 
Q@Q567 
@@568 
Q2569 
2572 
20571 
G@O572 
20573 
28574 
Q2575 


2608 


G62 


620 
G622 
B623 
@625 
Q@627 
B29 
G628, 
62D 
Q@62F 
@631 
0633 
8635 
2666 
Q697 
@6C8 


@7C8 
@8@D 
@852 
2897 


@8Ddc 
@8DE 


@8DF 


29389 


2020 


GAG 
GAG1 
BAAZ 
alfa a 
Gaaz 
ala] 
QBQz 
Fala) a 
GaQz 
Gaz 
BAA= 
@Q31 
@G31 
@Q31 
G1iae 
@045 
@@45 
2045 
Q845 
2045 
@7C8 
QAAQZ 
081 


ZAG 1 


A 
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DOS —- INSTRUCTIONS 


ORG 


$608 


* AREA WHERE USER ACCESSABLE VECTORS & VARIABLES STORED 


BUFFER (ALLOW USE FOR ANOTHER FILE) 


ON TOP OF CURRENT OVERLAY & JUMP TO SYSTEM OVERLAY 


ON TOP OF CURRENT OVERLAY & JUMP TO USER OVERLAY 


COUNT OF 6@THS OF A SECOND 
NUMBER OF I/O RETRYS INITIALLY SET TO 5 


TIME CONSTANT THAT CONTROLS PRINTER TRANSMISSION SPEED 
ADDRESS WHERE CURRENT OVERLAY WAS LOADED 


BASE OF USER’S ROOT + 1. 


POINTS TO ENTRY ZERO OF OVERLAY’S RBA’ 


JUST BEFORE CHECKING FOR AUTO EXECUTE 


JUST BEFORE BRANCHING TO 


USER PROGRAM 


RTS CODES — ALL HOOKS RETURN THRU HERE 


DCB USED TO READ SYSTEM OVERLAYS 


ADDR OF HIGHEST USEABLE MEMORY 
SEARCH ON GLOBAL OPEN 


READ 


"MAPS" 


AND MESSAGES 


USED TO READ USER’S PROGRAM & OVERLAYS 

BUFFER FOR SYSTEM USE(DIRECTORY + FAT READS & WRITES) 
FILE ALLOCATION TABLE (FAT) SIZE 

SAVE AREA FOR DRIVE @ FAT TABLE 


HELE EKEERE EERE EREREE KERR KEE E REE KEKE ER KEE KEKE H KEKE EEREKEKEEREEE EERE RERER 


4 £&£ ® © 


HEHEHE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEERER 
SEE iST MODULE FOR VALUE ASSIGNED 


HEKEEKEEEEEEEKEEEKEEEREE EEE EEEEEKKE EKER KEKE E KEE KERR EE EEREKEKKEEREREREREEEREE 


VECTOR RMB 2E1S z BYTES PER VECTOR 
* OPEN OPEN A DISK FILE 
* CLOSE CLOSE A DISK FILE 
* READ READ FROM A DISK FILE 
* WRITE WRITE TO A DISK FILE 
* RELSE RELEASE 1/0 
# DO LOAD & EXECUTE A SYSTEM OVERLAY 
* GO LOAD 
* LOAD LOAD SYSTEM OVERLAY 
*% DOUSR LOAD & EXECUTE USER OVERLAY 
* GOUSR LOAD 
* LODUSR LOAD USER OVERLAY 
* ERROR DISPLAY ERROR NUMBER IN "A” 
* TIME TURN ON/OFF TIME INTERVAL ROUTINE 
% PRNT PRINT A CHARACTER ON PRINTER 
* KEYIN INPUT NEXT KEYSTROKE FROM KEYBOARD 
* BASIC RETURN TO BASIC CONTROL 
CLOCK RMB Zz 
RETRYS RMB 1 
RATE RMB 2 
OLYLOC RMB z 
USRBSE RMB 2 
HOOK1 RMB 2 
HOOK2 RMB 2 
HOOKS RMB fd 
HOOK4 RMB 2 
HOOKS RMB 2 
RETURN RMB. = CONTAINS TWO 
DOSDCB RMB DCBSZ 
MSGDCB RMB DCESZ DCB USED TO 
USRDCB RMB DCBSZ DCB 
SYSBUF RMB 256 
FATSZ EQU 69 
FAT@ RMB FATSZ 
FATI RMB, FATSZ SAME FOR DRIVE 1 
FATZ2 RMB FATSZ 
FATS RMB. FATSZ 
FATS EQU FAT@ 
MAXMEM RMB 2 
DRIVES RMB 1 MAX NBR OF DRIVES TO 
OPT ‘3 
ENDWSE RMB 1 END OF EXTENDED WS 
OPT NOL 
* DB6dOlCUDS§5 5S T A R T § 
ORG ORGIN 
OPT i 
TTL DOS - I/0 ROUTINES 
OPT NOL 
* OPEN DIS K ae a Se = 
* 
* GIVEN: 
* A=DESIRED FILE STATUS 
* U->DCB 
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@2G1 a8 
2@1i1i@ 
20120 
@2138 
20140 
@Gi5a 
22142 
@a17@ 
201i8@ 
@Bi9a 
AB2AA 
28218 
QB220 
82328 
20248 
AB25 
QB262 
@a2728 
20280 
A2G292 
BO328 
G31 

BO320 
GB338 
@2342 
@8358 
A362 
8378 
QB380 
QA392 
204208 
00412 
G0428 
00432 
0448 
845 
20462 
22472 
O8482 
20492 
BAS 22 
2512 
@25208 
@@530 
28548 
Q2Q552 
G85468 
Q2572 
@G58 
Q22592 
28600 
28618 
@G628 
Q2638 
28648 
Q@G65a 
A28668 
044672 


@ii 190 
22576 
00577 
@@578 
@@a579 
G2582 
@@581 
GBAS532 
AA583 
GA584 
22585 
2@584 
48587 
20588 
AA589 
AG592 
AA59 1 
Aa592 
aG593 
Aa594 
@@595 
AA594 
Aa597 
2A59S 
@a599 
A2A5a0 
2B6OA1 
BG602 
A0603 
AMSA4A 
AASG5A 
ABSB6A 
ABSA7A 
AASAaS8A 
BBSA9A 
AAS5i aA 
AASiIA 
@BSiZA 
@@S513A 
ABS14A 
AQAS1i5A 
ABS1i6A 
QQS17A 
@AS1iBA 
@AS19 
AASZAA 
A@GSb21A 
ABAS22A4 
ABSz23A 
ARS24A 
GAb25A 
ABS26A 
ABS274 
ABS29A 
AASZIA 
AAS538 
AAS31A 
ABS3z2A 
ABS33A 


2989 
298C 
@98E 
Q2998 
A992 
A994 
a9 
2998 
BPPA 
B99C 
99D 
BPAB 
IAL 


OIA4 = 
AIAG 2 


@748 
BIAA 
BIAC 


B9AE : 


QR 


Q@9B2 : 


Z29B4 
QP9R7 
ARS 
Q°RB 


Q@9BD 
QoRF 
aIC1 


»SA 


@2Dz 


A 


BC7S 
GIFS 
A@7B28 


A 
2998 
A 
998 


DoS —- 1/0 ROUTINES 


ke OK RK KK KR RK KK KOR OK OK KK OK KK K KK KKK KK 


DCBDRV;U = DRIVE TO BE CHECKED ($FF=CHECK ALL DRIVES) 

"OPEN", DCB SHOULD CONTAIN: FILENAME: EXTENSION: 

1/0 BUFFER ADDRESS. NAME AND EXTENSION ONLY ARE COMPARED 

TO DIRECTORY ENTRIES TO FIND MATCH. TYPE AND ASCII FLAG ARE USED ONLY 
WHEN CREATING FILE (OTHERWISE THEY ARE OVERLAYED BY EXISTING VALUES). 
ALL 1/0 NEEDED TO OPEN FILE USES THE 254 BYTE AREA POINTED TO BY 

LAST I/O ADDRESS AS A BUFFER. 


BEFORE CALLING 


OPEN WORKS EXACTLY THE SAME FOR INPUT OR OUTPUT! ACTION IS CONTROLLED 
RY FILE STATUS SUPPLIED IN "A" (SEE DCBCFS IN DCB DESCRIPTION). 


OPENING A NON-EXISTANT FILE - IF CREATION IS ALLOWED: FIRST 32 BYTES OF 
DCB ARE PLACED IN DIRECTORY EXCEPT THAT DCBFCL IS SET TO $FF: DCBNLS 
IS SET TO ZERO AND DCBCFS IS SET TO PROVIDED STATUS. 


OPENING AN EXISTING FILE — THE 32 BYTE DIRECTORY ENTRY OVERLAYS THE 
FIRST 32 BYTES OF THE DCB EXCEPT FOR DCBCFS WHICH IS SET TO THE PROVIDED 
VALUE. 


(AN INVALID VALUE): DCBRBA 
AT ANYTIME BEFORE OR AFTER 


WHEN FILE IS OPENED: DCBPRN IS SET TO $FFFF 
IS SET TO ZERO, AND DCBLRN IS SET TO ZERO. 
CALLING OPEN; DCBLRB CAN BE SET OR CHANGED. 


FILE TYPE AND ASCII FLAG CAN BE CHANGED AFTER OPEN TO CAUSE THEM TO BE 
CHANGED WHEN FILE IS CLOSED. 


HEH IEE EE EE IEEE IEE EE ETE ETE EEE EEE EE EEE EE EEE EE KEE HERE EEE EEE EEE ER ERE EE EEE REESE 


DOPEN LDB DCBDRV;U 
PSHS Ds X 
CMPB #6FF REQUEST FOR SCAN OF ALL DRIVES 
BEG Doe IF YES 
CMPB #4 VALID DRIVE REQUESTED? 
BCS DOI IF YES 
LDA HERR PARAMETER ERROR 
DOERR STA 35 
PULS DsXsPC RETURN WITH ERROR CONDITION 
Doe CLRB START WITH DRIVE ZERO 
Dot STB DCBDRV;:U 
CLRA SAY LOOK FOR MATCH 
LBSR CHKDIR CHECK DIRECTORY ON THIS DRIVE FOR MATCH 
BEG DOS IF MATCH FOUND 
BMI DOS IF NO 170 ERRORS - JUST DIDNT FIND IT 


+ 


IT WAS SOME KIND OF 1/790 ERROR 


CMPA #1 DRIVE NOT READY? 
BNE DOERR IF NO 
TST iS REQUEST FOR SPECIFIC DRIVE? 
BPL DOERR IF YESs THEN THIS IS AN ERROR 
DOS Tsf i:5S REQUEST FOR SPECIFIC DRIVE? 
BPL DO4 IF YES: I DIDNT FIND HIS FILE 
LDB DCBDRV;U LAST DRIVE CHECKED 
INCB 
CMPB DRIVES ANOTHER VALID DRIVE TO CHECK? 
BCS Dol IF YES 
* MATCH NOT FOUND ~- IS IT OK TO CREATE? 
DO4 LDA 15 (DESIRED STATUS) 
BITA #CREATE CREATE SIT ON? 
BNE DO4A ie Yeo 
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28688 
22692 
22708 
Q2071@ 
QB722 
2073 
28748 
Q22752 
Q2874628 
022770 
28782 
22774 
GASAG 
22810 
QABz2 
Q2B83a 
22848 
Q22850 
A2AB6R 
208708 
2A88B 
2889 
Q2B7AG 
28912 
Q2A920 
28938 
Q2B94H 
Q2295a 
BAIEA 
22972 
2a982 
22992 
21008 
@101a 
81028 
21832 
21848 
21852 
21068 
21@72 
B18 
Bia 
11a 
01112 
@112 
01138 
01148 
@115@ 
1168 
01172 
@118@ 
01198 
21208 
01218 
Biz2@ 
01238 
01240 
Q1250 


Biz 10 
QB634A 
QAS35A 
BQS36A 
QBS37A 
ABVS38A 
BASE39A 
A@640A4 
QBBS541A 
AAb424 
BAS43A 
QQ544A 
GBG645A 
BQS46A4 
GQ547A 
QQ548A 
QAS494 
QBES5 AA 
Q@BS5 iA 
QBE5zA 
BASS 3A 
QASE54A 
QQS55A 
Q@BE56A 
Q20557 
A2BE5BA 
QBE59A 
ZBSSBA 
Q2Bb51A4 
QBBS62A 
QBBS43A 
Q2BS54A 
G@@S65A 
ZASSSA 
QBSS7A 
QBS46SBA 
QA569 
ZBS7BA 
G@BS71A 
QBS7ZA 
QB4573A 
QQS74Aé 
BASE75A 
QBBS7SA 
QBAS77A 
Q2BS7BA 
QQS7IA 
ABS8BBA 
ABSSiA 
Q2BEBzA 
BAS83A 
QBSB4A 
BASB5A 
ZBEB6A 
QAS87A 
Q2BV6ESS 
Q@BS89A 
QASEIBA 
BASE91A 


QFC3 
@gCc5 
QIC7 
BPC9 
@9CB 
Q@9CE 
Q9D2 
@9D3 
Q9D5 
Q9D7 
BDF 
Q9DB 
Q9DD 
Q9DF 
Q9E1 
Q9E3 
Q9E5 
Q9E7 
QIE9 
Q9EB 
Q9EE 
QF 1 
QoF4 


Q9F& 
ASF 8 
BIFA 
QB9FC 
QOFF 
BABI 
BABS 
@AGS 
GZAGS 
BABA 
BABC 


BAGE 
BA1@ 
BAIS 
BA16 
BAI? 
BAIB 
BAID 
BAZ 
BALZ 
BAZ4 
BAZ7 


BAZA 2 


BALC 
BASF 
BAS1 
BA34 
BA36 
QA39 


BASE 
BASE 
BA41 


BA a 
Di 2998 
61 ay 
23 Q9CE 
CS 21 A 
rr A 
QB2A3 B@C76 
sf) Q9DB. 
C1 2993 
QB a 
BD 2998 
E4 A 
él A 
BC A 
E4 A 
aad A 
4D & 
4E A 
C8 14 A 
C8 16 A 
2263 @C57 
18 GAGE 
E4 A 
61 A 
E4 A 
88 18 & 
@D BABE 
GE & 
a? BABE 
88 18 A 
Q4 BAGE 
@D A 
E4 A 
61 & 
88 18 a 
249 @CSF 
CB 18 A 
@E A 
@5 BAZ 
Q231F @D3F 
B7 Q@9D9 
Q2 A 
C8 23 a 
@2FD @D27 
AD Q@9D9 
@Z1C @C4e 
40 A 
@6C8 A 
45 A 
@22E @C47 
40 & 
FFF A 
C8 29 a) 


i ee 


DOS - I/O ROUTINES 
LDA #ERR1Q FILE DIRECTORY ENTRY NOT FOUND 
BRA DOERR 

DO4A TST isS ANY DRIVE SPECIFIED? 
BPL DO4B IF SPECIFIC 
CLR DCBDRV:U CREATE ON DRIVE ZERO 

DO4B LDA #SFF SAY LOOK FOR OPEN SLOT 
LESR CHADIR SCAN THE DIRECTORY 
BE® DO4e IF SLOT FOUND 
BPL DOERR IF SOME KIND OF I/O ERROR 
LDA #ERRI1 DIRECTORY IS FULL 

DOERRL BRA DOERR 

DO4C LDA 75 DESTRED STATUS 
STA i:S SAVE IT 
LDA #ERRI2 SAY DIRECTORY WAS CREATED 
STA 15 
LDA #SFF 
STA DCBFCLsU SET NUMBER OF 1ST CLUSTER 
CLRD 
STD DCBNLS:U CLEAR BYTES IN LAST SECTOR 
STD DCBMRB;sU CLEAR MAX RBA 
STA DCBMRB+23U 
LESR DCBDIR XFER DATA TO DIRECTORY 
BRA DOS GO CONTINUE PROCESSING 

* DIRECTORY ENTRY FOUND 

DOS LDA 1S DESIRED STATUS 
STA i:S SAVE IT 
CLR 15 
LDA DCBCFS:X CHK PREVIOUS FILE STATUS 
BE® DOS IF IT WAS CLOSED 
ANDA #CREATE+EXTEND+OUT IF LAST OPENED TO MODIFICATION? 
BE DOS IF NO 
TST DCBCFS:X CHK PREVIOUS FILE STATUS 
BE@ DOS IF IT WAS CLOSED 
LDA #ERRI3 SAY IT WASNT PREVIOUSLY CLOSED 
STA 15 

* XFER DIRECTORY ENTRY TO DCB 

DOS LDA 1;S DESIRED STATUS 
STA DCBCFS;X PUT IN DIRECTORY ENTRY 
LESR DIRDCB XFER DIRECTORY ENTRY TO DCB 
LDA DCBCFS:U 
ANDA #CREATE+EXTEND+OUT WRITES ALLOWED? 
BE® DOSA IF NO 
LBSR SYSWRT REWRITE DIRECTORY RECORD 
BNE DOERRL. IF I/0 ERROR 

DOSA LDA #2 
STA DCBSEC:U 
LBESR SYSRED READ FAT RECORD 
BNE DOERRL 
LESR ADRFAT POINT "X" AT FAT TABLE IN MEMORY 
PSHS U 
LDU #SYSBUF POINT TO BUFFER 
LDB #49 BYTES TO MOVE 
LBSR XFRUX MOVE THEM 
PULS U 

* DO OPEN RESETTING 
LDD #EF FFF 
STD DCBPRN: U 
CLRD 


ooo 
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i260 @@492A BA43 ED CS 2B A STD DCBRBAs:U 
Q1iZ7Q @QS9ZBA BA46 AT CB 2D A STA DCBRBA+25U 
O128Q @84944 @A49 ED CB ZEA STD DCBLRNsU 
Q1iZ9Q Q@BS95A BA4C SF CB 3B A CLR DCBMDT+U 
E 


@i3sz@aa @Ab6S6A BASF 16 AGBac BAD LBRA DC5 

01318 @@4697 % 

Biszzea Bee KEELER KKH K ERK EERE EEE EEE EEE EEE EE EEE KK EEK HK EEE KE HEE HEHE ERE E EEE REE REER 
21338 B@699 * CLOSE DISK FILE 

@1348 @27aa * 

01350 @@7@1 * GIVEN: U -> DCB (CONTAINING FILE STATUS) 

0213684 B@702 * 

01378 @@783 * FUNCTION: 

@138@ 20724 * FIND DIRECTORY ENTRY AND VERIFY THAT FILE IS OPEN. THENs IF FILE IS 
01398 20785 * TO BE KEPT; UPDATE AND RE-WRITE DIRECTORY ENTRY AND REWRITE FAT TABLE. 
@1480@ 28786 * IF FILE IS TO BE PURGED: MARK DIRECTORY ENTRY AS RE-USEABLE AND RE-WRITE 
@1418 @2727 * THEN MARK CLUSTERS AVAILABLE IN FAT TABLE AND REWRITE. 

61420 08788 ee ee ee ee ee ee ee ee eS 
041438 @2@7894 @ASzZ 4F DCLOSE CLRA {RESULT CODE) 

014440 @@71@A @A53 34 16 a PSHS Ds X 

@145@ @@711A4 @A5S5 4F CLRA SAY LOOK FOR A MATCH 

21446@ @@7124 @A546 17 @2iD @C74 LESR CHKDIR CHECK DIRECTORY FOR A MATCH 

@147@ @@7134 @A59 27 a7 BAb2 BE HCL IF MATCH FOUND 

@2148@ @@7144 @ASB ZA Zz BASF BPL DCERR IF I/0 ERR 

@149@ @@7154A @ASD 86 QA fa LDA #ERR1I@ DIRECTORY ENTRY NOT FOUND 

@154@0 @@716A BASF 16 FF36 09938 DCERR LBRA DOERR 

G2i5i@ @@7i7A @Ab&2S Ab C8 10 A DCL LDA DCBCFS;:U IS FILE OPEN? 

@i520 @@718A @A65 26 4 GASB BNE DC2 

01530 @@7194 @A467 86 13 4 LDA #ERRI9 CLOSING UNOPENED FILE 

01548 @@728A BAS9 22 F4 QA5F BRA DCERR 

@i55@ @@721A @A6B EC Ce 22 A DCZ LDD DCBTRK+U 

@1i56@ @@722A BASE 34 AS A PSHS D SAVE LOC OF DIR ENT 

i578 @@7234 @A78 17 @2D@ @D43 LBSR REWRTE REWRITE BUFFER IF IT. HAD BEEN MODIFIED 

01580 @8@7244 @A73 35 QS fa PULS D 

91598 @@7254 @475 26 ES QA5SF BNE DCERR IF I/0 ERROR OCCURRED IN THE PROCESS 


@16@@ @@726A @A77 ED C8 22 A STD DCBTRKsU RESTORE LOC OF DIR ENT 
@161@ @A727A BA7A AS C8 18 A LDA DCBCFS:U 
21620 @8728A BA7D 34 a2 A PSHS A SAVE FOR DIRECTORY RE-WRITE DECISION 
21638 @8729A @A7F OF C8 18 A CLR DCBCFS:U CLEAR CUR FILE STATUS IN DCB 
co 21640 @@730A BASZ 84 18 A ANDA #WORK WORK FILE TO BE DELETED? 


@1658 @@731A @A84 27 18 BASE BES DCS IF NO GO REWRITE DIRECTORY & FAT TABLE 
21660 @@732A BASS SF C4 A CLR +U MARK DIRECTORY ENTRY AS RE-USEABLE 
@1672 @Q733A BABB 34 1@ A PSHS x SAVE ADDR OF DIRECTORY ENTRY 

21680 800734 * MARK FAT TABLE ENTRIES AS AVAILABLE 

816928 @@735A BABA 17 BiBE @C4e LBSR ADRFAT POINT "X" AT FAT TABLE IN MEM 
21700 @@736A BABD AS 4D A LDA DCBFCLsU GET FIRST CLUSTER NUMBER 

@171@ @B737A BASF ZB OB BASIC BMI DC3A IF NO CLUSTERS IN USE 

B1728 @B@7384A BAI1 ES BS A DCS LDB Ais X GET NUMBER OF NEXT CLUSTER 

81738 @@739A BA9S SF 86 A CLR Ais X CLEAR CLUSTER ENTRY 

21742 @@74@A BAIS 6A B& A DEC Ais X SET tO SFF 

@1750 @8741A @AI7 IF 98 A TFR Bs A 

21760 @@742A BAID 4D TSTA 

21778 @B743A BAIA ZA ro BAP 1 BFt. DC3 IF MORE TO GO 

01782 @@7444 @AIC 35 1@ A DCSA PULS X ADDR OF DIR ENTRY 

@1i79@ @@745A BASE 17 B1iB6é @C57 DCc4 LBSR DCBDIR XFER TO DIRECTORY 

@18@@ @8746A BAA 35 2 A PULS A PRE-CLOSE CFS 

Bi8i@ @@747A BAAS 34 GE A ANDA #CREATE+EXTEND+OUT WRITES ALLOWED? 

21820 @8748A BAAS 2 io BARC - BE® DC4B 

@1838 @@749 * SET DCBNLS TO REFLECT DCBMRB (MAX RBA) 


PAGE 


1848 
2185@ 
@186@ 
21878 
@2188e@ 
21892 
21728 
21918 
1928 
81938 
21948 
01958 
21968 
21978 
21980 
21998 
22008 
2012 
B2028 
B2032 
22040 
2052 
@2068 
82878 
B2088 
B2092 
221008 
@211@ 
O2120 
02130 
2140 
22158 
@2162 
22172 
2182 
2192 
GB2228 
02218 
B2220 
Q2238 
2248 
B2258 
82268 
B2272 
G2288 
B2292 
B2308 
82318 
82322 
02332 
2342 
2358 
B2368 
02378 
82380 
22392 
@2488 
02418 


@i4 10 
QA750A 
BA751iA 
AAa7524 
QAa753A 
Q2A7544 
@2755A 
QA756A 
@A757A 
227584 
BA759A 
2A7 SAA 
BA7461iA 
QB7S24 
AB7S3A 
Q2B7bS44 
@2B765A4 
@Q7465A 
Q2B7E7A 
AAa7SSA 
BB7S9A 
Q@A77 AA 
Q@AB771A 
QA772A 
A2773A 
QQ774A 
02775 
22776 
@2777 
@@778 
@a779 
2a78@ 
22781 
@a782 
422783 
02784 
02785 
@2786 
24787 
@278s 
22789 
Q279B 
22791 
BA79z2 
BA793 
@2794 
GA795 
2A79S 
22797 
@Aa79SE 
B2797A 
AASaGA 
Z2QS@QiA 
A2A8az 
A2A8a3 
AA8a4 
BA8Q5A 
Q@BSQs6A 
QASA7A 


BAEZ 
QAE4 
BAE7 


QZAEA 
BAED 
@AEE 


.SA:0 
4F 

ES6 8816 A 
26 88 Q@AB5 
EC 8814 A 
27 @3 ABS 
cc 19a OA 
ED @E A 
i7 285 OD3F 
26 A3 BASF 
17 @18C ac4aeB 
34 8640 A 
CE @4C8 A 
C6 45 A 
17 Q@1A6 BC4F 
30041 A 
C6 BA A 
17 @197 QC67 
35 40 A 
86 OF A 
A7 CB 23 A 
17 265 QD3F 
: @2 BADE 
A7  E4 A 
6D E4 A 
35 94 A 
34 «BB A 
CC @1QF A 
i7 8091 OB7B 
E46 C8 2D A 
4F 

AS 8B A 


DOS - 1/0 ROUTINES 


ct ee 


CLRA 
LDB DCBMRB+2 5 X 
BNE DC4A 
LDD DCBMRB;sX IS IT A NULL FILE 
BE® DC44 IF YES 
LDD #$14@ 
DC4A STD DCBNLS: X 
LBSR SYSWRT RE-WRITE DIRECTORY RECORD 
BNE DCERR IF I”70 ERROR 
DC4P. LBESR ADRFAT 
PSHS U SAVE DCB ADDR 
LDU #SYSBUF POINT TO SYSTEM’S BUFFER 
LDB #49 
LEBSR XFRXU XFER INTO BUFFER 
LEAX is 
LDB #2546-69- 
LBSR XFRUX CLEAR REST OF BUFFER TO FF 
PULS U RESTORE DCB ADDR 
LDA #2 
STA DCBSECsU 
LBSR SYSWRT WRITE IT 
BE DC5 
STA 55 IF I70 ERROR 
DC5 TST 35 SET COND CODES 
PULS DsXsPC 


* 


KEKEHKKKEEKKEKEEKEEKEEEEEEKEEKRKKREREKRHRRKHKKEREE KEKE KEKKRKEEEREKERKEEKRREEKREE KERR EREE 


* 


OR OK OK oe OR ok Ok oe OOK Ok OOK OK OK OK OK kk kK OK 


* 


READ & Loa Etat Di 3K RECORD 


GIVEN: U -> DCB (THAT HAS ALREADY BEEN OPENED! ) 
A = FUNCTION DESTRED CODED AS FOLLOWS: 
BIT @ ON TO READ VIA RBA 


OFF TO READ VIA LRN 


BIT 1 ON TO READ WITHOUT CHANGING POINTER 
OFF TO EXIT AFTER POINTING AT NEXT (PREVIOUS) RECORD 
BIT 2 ON TO READ BACKWARDS 


OFF TO READ FORWARD 
EXAMPLE! A=ZERO TO READ THE CURRENT LOGICAL RECORD AND THEN ADVANCE 
THE LOGICAL RECORD NUMBER BY 1. A = 2 TO "READ FOR UPDATE” A LOGICAL 
RECORD. A = 1+4 (5) TO READ STARTING WITH THE RBA’ TH BYTE OF DATA 
IN THE FILE: FOR DCBRSZ BYTES. THEN SET RBA TO POINT DCBRSZ BYTES 
AHEAD OF THE FIRST BYTE READ. 


NOTE: LOGICAL RECORD SIZE: RECORD STORAGE ADDRESS AND 1/0 BUFFER 
ADDRESS ARE USED. IF LOGICAL RECORD SIZE IS 254; RECORD STORAGE 

AND I/O BUFFER MAY BE THE SAME ADDRESS. IF DCBRSZ IS ZERO: READS WILL 
TRANSFER BYTES FROM THE FILE TO CDCBREC] UNTIL A CHARACTER MATCHING 
DCBTRM IS TRANSFERRED. 


EREREKKREEKEEEEEREREREEKEKREEKREEEREKRERERERERHEEEREERREEREERE KER ERE RE REE HERE REERE 


DREAD PSHS Asxsy¥ 
LDD #$01@0+ERRI5 
LBSR RDWR DO SETUP COMMON TO READ AND WRITE 


% 
* 


LOOP TO XFER BYTES TO RECORD AREA 


* (X->BUFFERs Y->RECORD AREA) 

DRS LDB DCBRBAt2Z;U DISPLACEMENT IN CURRENT SECTOR 
CLRA 
LDA Ds X GET A BYTE 


CES 


. 


PAGE 


2420 
2430 
2440 
Q2450 
2462 
2472 
2480 
W249 
Q2500 
@2510 
2520 
Q2532 
Q2540 
2558 
2560 
22570 
W258 
22590 
22620 
2610 
26208 
Q2630 
2642 
2650 
2640 
2672 
2680 
Bz2692 
az700 
22710 
2720 
02730 
Q2742 
Q2750 
276 
Q2770 
2780 
22798 
az800 
B2810 

2820 

2830 
2840 
o2z850 
2860 
22870 
azesa 
az890 
az900 
02910 
Bz920 
02930 
Bz2940 
Bz2950 
22968 
2970 
2980 
2990 


@i5 10 


BABABA 
BASAIA 
GBSiBA 
Q@@B1i1A 
ABB1 ZA 
G@8134 
A@BSi4A4 
Q@AaB815A 
@a8i6A 
288174 
G@@BSisBAa 
BGBE194 
Q2ASZAA 
A@B214 
AAB22 

Q@BB23A 
GBB24A 
GABSS5A 
QAUB26A 
QAB827A 
A@AB2BA 
BAB=S9A4 
ABESAA 
BZAB31A 
Q@A832 

O8833 

28834 

Q@@835 

@2836 

GA837A 
AAS38A 
BBB394 
ABS4BA 
ZAB41A4 
GBB4 2A 
GAB4 34 
BA8444 
G@@845A 
BAS46A 
QBBB47A 
2AS4BA 
AA849 

A@BSs5 aA 
G@@SS51A 
@B852A 
Q@A853A 
A2AS544 
Q@QBS55A 
@B856A 
G@Q857A 
GaSS8A 
Q2AaS59A 
A2AS60A 
AASS1A 
BAB624 
BABS3A 
QBABS64A 
@2865 


QAF 
QAFZ 
QAF5 
QAF7 
QAFA 
BAFC 
QAFF 
QROz 
@Ba5 
@Ba8 
QRBA 
@BaC 
Q@ROE 
OB1ia 
OB13 
QB15 
@B17 
QB19 
@BR1iC 
Q@BiE 
OBZ 

ORZ2 
AB25 
QR27 


»~ SAE 


Q 
AB a 
C8 2D A 
1E @Bi5 
@249 @D43 
BE GBAA 
C8 2B A 
AGA 1 a 
C8 2B A 
@291 @D99 
Vat) A@R1@ 
67 & 
E4 A 
BZ a 
@1iD4 @CE7 
eS Q@EBA 
E4 A 
a? BRZe 
Q2A01 A 
E4 A 
CA BAEA 
Q7 ABZ9 
CB 13 A 
SF a 
Ci BAEA 
BS A 
ce 18 a 
40 A 
28 BB3A 
@20E @D43 
FErE & 
a? A@B43 
65 A 
28 & 
Fa QB 32 
C8 26 A 
Ca 27 A 
C8 ZB A 
Ce 14 A 
16 @B65 
28 GBS 
C8 2D A 
C8 16 A 
ac Q@B65 
C8 2B A 
C8 14 A 
C8 2D A 
cS 16 A 
65 A 
z & 
32 A 
BA Q@B77 


DoS - 1/70 ROUTINES 

STA 5¥+ 

INC 

BNE DR5SB 

LESR REWRTE 

BNE DRSAA 

LDD DCBRBA: U 

ADDD #1 

STD DCBRBA: U 

LBSR CALSEC 

BE® DR5A 
DR5A44 LEAS 735 

STA 55 

PULS ArXs¥aPC 
DRS5A LBSR DSKRED 

BNE DRSAA 
DRSB LDD 35 

BE® DR5C 

SUBD #1 

STD 3S 

BNE DR5 

BRA RDWRX 
DRS5C LDA DCBTRM:U 

CMPA —is¥Y 

BNE DR5 


Sd 


STORE IN RECORD AREA 


DCBRBA+Z;U ADVANCE POINTER IN BUFFER 


IF IN SAME SECTOR 

ENSURE PREVIOUSLY MODIFIED DATA GETS WRITTEN 
IF WRITE ERR 

POINT TO NEXT SECTOR 
RECALCULATE TRACK & SECTOR 
IF OK 

SCRAP STUFF IN STACK 


IF I/0 ERROR 
GET COUNT DOWN VALUE 
IF VARIABLE LENGTH STRING 


GO GET ANOTHER CHR 

GO DO CLEAN-UP COMMON TO READ AND WRITE 
STRING DELIMITER 

WAS LAST CHR STORED A DELIMITER? 

IF NOs KEEP GOING 


KHER EEE E EEK ERE EEE REE EERE REE EERE EERE 
* CLEAN UP COMMON TO READ AND WRITE 
KREK EEK EE REE EEK EEE EERE EER EEE KERR EER 
# RECORD HAS BEEN READ -— CLEAN UP 


RDWRX PULS 
LDA 
BRITA 
BE® 
LBSR 
LDD 
BRA 
LDA 
BITA 
BNE 
LDD 
DR&B sTD 
* CHECK FOR 
LDD 
CMPD 
BCS 
BNE 
LDA 
CMPA 
BCS 
LDD 
STD 
LDA 
STA 
LDA 
ANDA 
PULS 
BE® 


DROAA 


DROA 


DR&C 


DR6D 


D 


DCBCFS:U FILE STATUS 


#SHARE 
DR6A 
REWRTE 
#EF FFF 
DR&B 
5:5 
#NOW 
DR&AA 


OPTION SET? 

IF NO 

FREE UP BUFFER 

MARK INVALID SECTOR IN BUFFER 


R/W OPTION 
REWRITE NOW? 
IF YES 


DCBRBA:U LAST SECTOR ACCESSED 
DCBPRN:U MARK WHICH SECTOR IS NOW IN BUFFER 


NEW DCBMRB 
DCBRBA:U 
DCBMRB:U 


DR&D 
DR&C 


IF IN & LOWER SECTOR 
IF A HIGHER SECTOR 


DCBRBA+23U 
DCBMRB+23 U 


DR6éD 


DCBRBA: U 
DCBMRB:s U 


IF A LOWER BYTE 


DCBRBA+2:3 U 
DCBMRB+2: U 


5:35 


READ/WRITE OPTION 


#UPDATE SHOULD RBA & LRN BE RESET TO STARTING VALUE? 


AsXs¥ 
DR6E 


IF NO 


* RESTORE ORIGINAL POINTERS 


SS 


PAGE @16 I0 -54:8 DOS — I/0 ROUTINES q ] 
Q@30@80 @B866A @BSD A7 Ca 2D a STA DCBRBAt+23 U 

@3018 @@8467A @B7A@ AF c8 2B A STX DCBRBA;:U 

@3020 228684 @B73 1@AF CB ZE & STY DCBLRN;s U 

@230308 @@S849A BE77 SF E4 A DR6E CLR 15 

@3040 @@870A @B79 35 Bz a PULS AsXs¥sPC 

230508 @@871 ¥ 

3060 Aas72 HEE KH EEE EKR EERE EEE EE EEE EEE EEE EEE 

23878 @@873 * SETUP FOR READ OR WRITE 

@3080 @2874 * GIVEN: A=1 FOR READs = FOR WRITE 

423890 @@875 *% B=ERR NBR FOR POSSIBLE USE 

@231@@ @as76é HEKKEE RHE EREER ERE EERE EEE EEE EER HER EEE 

03118 B@877A BEB7B 34 AS A&A RDWR PSHS D SAVE IN CASE NEEDED 

@312@ @@878s * IS FILE OPEN? 

03130 @@879A @B7D A& cB 1a A LDA DCBCFS;:U 

23140 @@88@A @BSO 24 ag ABBA BNE RDWR1 IF YES 

23150 @@88iAd B@BSz 846 GE & LDA #ERRI4 IF NOT OPEN 

@3160 @@882A @BS4 32 64 & RDWRER LEAS 455 {DIDN’T NEED IT AND RET ADDR) 
43178 B@883A OBS4S A7 E4 ray STA 35 

Q@3180 @@8844 @B8S8 35 4 ray PULS AsXs¥aPC 

23198 @@ess * IS THIS TYPE OF OPERATION ALLOWED (READ OR WRITE)? 
@3200 228864 @BSA AS E4 A RDWR1 BITA 3S {1 FOR READs 2 FOR WRITE 

@3210 @@887A @BSC 2b A4 BB9Z BNE RDWR2 IF YES 

Q3220 O@B@888A @BSE AS 61 A LDA 1:5 {ERROR NUMBER PROVIDED) 

Q@3230 @@889A BE9G 2 F2 QBB4 BRA RDWRER 

23240 B@aa7e os 

03258 @8891 * CHECK FOR STARTING RBA 

3268 @AaS89z2 * IS 1/9 BY RBA OR LOGICAL RECORD? 

23270 O@@8934 @BS=e AS 64 A&A RDWRZ LDA 455 OPTION PROVIDED 

@3280 @2894A @B94 84 Qi & ANDA #RBA 

@3298 O@2895A @B946 245 GE ABAS BNE RDWR4 IF READ VIA RBA: USE RBA’S CURRENT CONTENTS 
23380 @@3896 * READ BY RECORD NUMBER 

233148 @@897A @B98 Ec cs ii A LDD DCBRSZ:U FIXED OR VARIABLE LENGTH RECORDS? 
Q@3320 Q@2898A @BIB 25 a4 ABA L BNE RDWR3 IF FIXED LENGTH 

@3338 Q@@899A @B9D 84 14 & LDA #ERR2Z@ CANT CALCULATE - RSZ = ZERO 

23348 @@9@@AA O@BOF 20 ES AB84 BRA RDWRER 

23350 @B@9AiA BBAI 17 @1B3 @D57 RDWR3S LEBSR CALRBA CALCULATE RECORD’S STARTING RBA 
@3360 @@982A A@BA4S 24 DE AB84 BNE RDWRER IF OVERFLOW OCCURRED 

23378 O8983 * 

23388 A2a7a4 OPT t: 

23398 820985 * MAKE SURE STARTING RECORD IS IN BUFFER . 
23400 B2a9G6A @BAS EC C8 2B & RDWR4 LDD DCBRBA:U (RELATIVE RECORD NEEDED) WwW 
23410 @@9@7A ABBAS 1@A3B CB 29 A CMPD DCBPRN;U IS NEEDED RECORD IN BUFFER? 

23420 229884 @BAD 2 Li ABCO BE® RDWR4A IF YES 

03430 B@909A @BAF 17 G1i91 @D43 LBSR REWRTE REWRITE BUFFER IF IT HAS BEEN MODIFIED 
023440 @291@0A @BBs 26 Da @B84 BNE RDWRER IF [70 ERROR IN THE PROCESS 
03458 O@@91i1A @BR4 17 BieEs2 @DI9 LESR CALSEC CALCULATE TRACK & SECTOR 

03460 @@9124 @BB7 24 CB GB84 BNE RDWRER IF TRYING TO GO BEYOND EOF 

23470 @2913A @BRS 17 2128 @CE7 LESR DSKRED READ THE SECTOR 

23480 @@914A @BBC 246 CS ABSB4 BNE RDWRER IF I/O ERR 

23490 @@9154 @BBE 22 a5 @BCS BRA RDWR5S 

@35@00 @@916A BBCA 17 @iDC @D9F RDWR4A LBSR CSENT CHECK FOR EOF 

23510 @@917A @BC3 24 BF B84 BNE RDWRER IF TRYING TO GO PAST EOF 

@3520 @2918 * 

@3530 @@919 * CORRECT STARTING SECTOR IS IN BUFFER 

23548 @a928 * GET SET TO XFER RECORD 

@3558@ @2921A @OBCS 35 246 A RDWRS PULS Ds¥ (D=1/@; ERR NBRs Y = RETURN ADDR) 
@3560 @@a92z2 OPT NOL 

035708 @BC7 AE CB 2E a LDX DCBLRN:s U 


QAPZBA 


ao CTS 


= 


PAGE 


@3580 
23590 
3620 
03618 
A23628 
3638 
83648 
23658 
3668 
Q367@ 
3680 
23490 
3728 
3718 
Q@3722 
43732 
03740 
43758 
03768 
3772 
83782 
43798 
Q23808 
Q@3818 
23828 
43838 
3848 
G3858 
23862 
83878 
23882 
G23898 
3988 
@3918 
3922 
Q3932 
43942 
A395 
Q396 
3978 
A398 
23990 
B4082 
G@401@ 
@40228 
G40328 
24048 
4058 
B4262 
44078 
24082 
48°90 
24108 
4112 
O4120 
04132 
24148 
@415@ 


@i7 19 
BAIZ4SA 
BASZ5A 
AaPIZ6A 
BASZ7A 
AAPZBA 
AAIZIA 
AGBI3AA 
AAIBIA 
AAISZA 
BAS3BBA 
QAI34A 
Aa935A 
AAI36 
GA937 
2A938 
BAS39 
Aa948 
AAI4 1 
BA942 
AG943 
AAaI44 
AG945 
AAPI44 
@A947 
@Ga948 
ABI4D 
G2G952 
AG951 
ABISZA 
AGBSS3A 
AAIS4A 
G@955 
AS95646 
@A957 
GaI58A 
ABISIA 
ABISAA4 
AABIS1A 
BAISZA 
AAPIE3A 
AAIS44 
A@aI4S5A 
ABISSA 
ABIVS7A 
ABISSA 
ABIS9A 
BASTBA 
ABI71A 
QB97ZA 
ZO97 3A 
AAIT4SA 
@Aa975A 
AAaI7SA 
AAIT 7A 
GQ97BA 
ABI7PA 
BAIBBA 
ABIS1A 


BECA 
ABCC 
@BCE 
@BD1 
@EBD4 
@ED7 
GRD? 
@BDC 
@BDE 
BRE 
@RES 
@BE7 


QBE8 
Q@BEA 
Q@BED 


Q@BEF 
GBF 2 
QBF 3 
@BFS 
Q@BFS 
QBF A 
@BF C 
Q@BFF 
BCA 
BCO4 
BCBS 
AaCcay 
A@cac 
@CQF 
Q2Ciz 
O@C14 
@C16 
@c18 
Z@CiA 
@CiD 
Q@C1iF 
BC21 
C24 
C26 


i@ A 
@1i A 
C8 2E Ay 
CB 2B A 
C8 2D A 
z A 
ca il A 
BS A 
28 A 
C8 24 A 
C8 27 & 
oe A 
@215 a 
BC @B7B. 
C8 2D A 
CB 24 A 
BE A 
Ag A 
84 & 
C8 2D A 
23 BC2z4 
Q@@ES @CEA 
GE @Ci4 
CB ZB A 
A2OVGi ay 
CB ZB A 
@187 @D99 
Q& BCiA 
67 A 
E4 A 
B2 A 
@BCA B@CE7 
ro BCci4 
an A 
C8 30 a 
E4 A 
a? @C31 


DOS - 1/0 ROUTINES 


PSHS 
LEAX 
STX 
LDX 
LDA 
PSHS 
LDD 
PSHS 
PSHS 
LDX 
LDY 
RTS 
¥ 


X SAVE IN CASE POINTERS DON’T ADVANCE 
1sX POINT TO NEXT RECORD 

DCBLRN: U 

DCBRBAs U 

DCBRBA+23 U 

AaX SAVE INCASE POINTERS DON’T ADVANCE 
DCBRSZ;U GET RECORD LENGTH 

D SAVE AS COUNT DOWN VALUE FOR LOOP 

¥ SAVE RET ADDR 


DCBBUF:U ADDR OF BUFFER 
DCBLRB:U ADDR OF LOGICAL RECORD BUFFER 
RETURN TO READ OR WRITE LOOP 


HEHEHE EEE EEE EEE EEE EEE EEE EEE EEE EEE EERE EERE EEE EEE EEE EERE EEE EEERRERER EE 


WR IT 2 


& 


BIT @ 


Sit 2 


BIT = 


BIT 3 


Kk OR KR KK KK KK OF 


* NOTES 


GIVEN: U -> 


A CoO 2 GA. DISK RE £0 FD 


DCB (THAT HAS ALREADY BEEN OPENED! ) 


FUNCTION DESIRED CODED AS FOLLOWS: 

ON TO WRITE VIA RBA 

OFF TO WRITE VIA LRN 

ON TO WRITE WITHOUT CHANGING POINTER 

OFF TO EXIT AFTER POINTING AT NEXT (PREVIOUS) RECORD 
ON TO WRITE BACKWARDS 

OFF TO WRITE FORWARD 

ON TO RELEASE BUFFER AFTER WRITE 

OFF TO WAIT UNTIL PHYSICAL I/0 
FUNCTION IS NEARLY THE SAME AS DREAD - SEE NOTES UNDER DREAD. 


IS NECESSARY 


HE TE EAE ETE EE TEE EEE HEHEHE EEE REE EEE ERE KEEREREEEEREEERERKEREREREEREEEE EEE EEERERERE 


DWRITE PSHS 
LDD 
BSR 
* 
# 100F 10 
DW5 L.DE 
CLRA 
LDX 
LEAX 
LDA 


DWSAA 


DWSA 


DWSB 


As Xs ¥ 
#$O200+ERRE 1 
RDWR DO SETUP COMMON TO READ AND WRITE 


XFER BYTES FROM RECORD AREA 
*% (X->BUFFERs 


Y~->RECORD AREA) 
DCBRBA+Z;U DISPLACEMENT IN CURRENT SECTOR 


DCBBUF;U ADDR OF BUFFER 


Ds X DETERMINE ADDR IN BUFFER 
Te ea GET BYTE FROM RECORD AREA 
aX STORE IN BUFFER 


DCBRBAtZ;U ADVANCE POINTER IN BUFFER 


DW5B IF IN SAME SECTOR 
DSKWRT REWRITE SECTOR 

DW5AA IF 1/0 ERROR 
DCBRBA:s U 

#1 POINT TO NEXT SECTOR 
DCBRBA:; U 

CALSEC RECALCULATE TRACK & SECTOR 
DW5A IF OK 

7:38 SCRAP STUFF IN STACK 
3S 

AsXs¥aPC 

DSKRED 

DW5AA IF 1/0 ERROR 

#1 


DCBMDT;U MARK NEW REC AS MODIFIED 
1S GET COUNT DOWN VALUE 
DWSC IF VARIABLE LENGTH STRING 


Te ee 


PAGE @18 I10 »-5A:@ DOS ~ 1/0 ROUTINES ( ] 
24168 @29382A @8C29 83 AAA 1 es SUBD #1 

241728 @@983A @C2B ED E4 a STD 35 

04188 @@9844 @Cz2D 264 ce @BEF BNE DWS GO GET ANOTHER CHR 

24192 O@2985A BC2F 22 27 @C38 BRA DWS 

24200 O29864 @C31l Aé Coe 13S A& DWSC LDA DCBTRM:U STRING DELIMITER 

@4212@ @@2987A @C34 Ai oF a CMPA ats WAS LAST CHR STORED A DELIMITER? 
O4220 O29388A @C36 26 R7 @BEF BNE DW5 IF NOs KEEP GOING 

24238 82989 * 

24248 O299R * RECORD HAS BEEN WRITTEN — CLEAN UP 

@4258 @@991A @C38 86 @i A DWS LDA #1 

@4258 O@2992A @C3A A7 Ce 38 a STA DCBMDT;:U ENSURE THIS SECTOR GETS REWRITTEN (EVETUALLY) 
4278 829934 @C3D 7E @B29 a JMP RDWRX CLEAN UP SAME AS FOR READ 

24288 8a994 * 

04290 @A995 HERE R EERE EERE EEE EEE REE E EEE EEE EEE HERE EH ERE EERE 

024308 @8996 * RELEASE THE I/O BUFFER 

04318 @2997 * (USED WHEN USER WANTS TO CONTROL SHARED BUFFER) 

84328 82998 * GIVEN: U->DCB 

84338 @a999 ERE EERE EEE EE KEE EE EEE RHEE EHH EEE HEE ERE HEE EH EKRE EEE 

04342 @1@@@A @C4a 17 @1@@ @D43 DRELSE LBSR REWRTE REWRITE BUFFER CONTENTS IF NECESSARY 
24350 @1@@1iA @C43 CC FFFF & LDD #HEFFFF 

04368 218024 @C446 ED CS 29 fs STD DCBPRN:U FORCE READ NEXT TIME 

04378 B1@@3A C49 4F CLRA 

04388 @1@04A4 @C4A 39 RTS 

@0@218 81085 OPT e. 

@8@20 B1aad Tt. DOS ~ SUPPORTING SUBROUTINES 

2QG3Q 01a07 OPT NOL 

AAG4A Bieaeag HEE KEERKE REE RHEE RHEE KEE KEE KEE HEE EEE 

GQG5Q G1aas * POINT "X" AT FAT TABLE IN MEMORY 

@8@268 81018 * GIVEN: U-> DCB CONTAINING DCBDRYV 

@QQ7Q Bi@ii * RETURNED: X 

GAGBA Bigiz KEKE EE EE ER ERE RE EEREER EER HERE REE EER 

Q2G@A9@ Bi@iBdA O@C4B SE @7C8 A ADRFAT LDX #FATS FAT TABLE STORE AREA 

@BGi@@ @igi4sA AC4se AS Ce 2t a LDA DCBDRV;U DRIVE CONTAINING FILE 

@@1ii@ @i@i5A @cd5i cé 45 a LDB #69 NUMBER OF BYTES SAVED 

@@iz@ @1iG@i6A @C53 3D MUL 

24138 B1@i17A BC54 3a BE. a LEAX Ds X POINT TO CORRECT AREA 

@8148 @1@1i8A @C546 39 RTS 

@2i5@ B1i@ig9 * 

QBié6A 01820 HEE GEE EEE EEE EEE EERE EEK EEE EEE EEE EEE HEHE EEE KEE EEE HEE KEEEE 
@2@@i7@ @iazi €*RE ER SYTES ROUTINES 
QGAis@ O1a2z2 EERE EE EEE EERE EE EEE EER EEE EE EEE KEKE EEE EERE HEHEHE EKER EERE EE ws 
22198 81823 * XFER 32 BYTES FROM DCB (AT :U) TO DIRECTORY (AT +X) 
@B20@ B1iB2Z4A BC57 34 56 A& DCBDIR PSHS DsXsV 

@8218 @1@25A @C59 C6 2@ fs LDB #32 BYTES TO XFER 

Q@O220 010264 @C5SB 8p BA, BC&7 BSR XFRUX 

@O230 @1027A @C5D 35 DS & PULS DsXsUsPC 

Q@0240 81828 * XFER 32 BYTES FROM DIRECTORY AT +X TO DCB AT ;3U 

@O252 @1029A @CSF 34 36 A DIRDCBR PSHS Ds XsU 

@@2460 Bia3@A B@Chi C4 2@ & LDB #32 

@@278 B1i@3iA @CS&3 Bd BA @C&F BSR XFRXU 

G@O282 210324 @2C65 35 DS a PULS DsXsUsPC 

@B298 @1833 * TRANSFER B BYTES FROM :U TO +X 

Q@B300 810344 BC47 AS CB A XFRUX LDA 3 U+ 

@@31@ @1@354 @Cé69 A7 82 a STA sX+ 

Q@@32@ 810364 BC4SB SA DECB 

@8338 818374 @C&C 2b a 2C&7 BNE XFRUX 

@8348 @1@384 @Cb&E 39 RTS 

20350 01839 * TRANSFER B BYTES FROM ;:X TO 3U 
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28368 
20372 
GB388 
@2039Q 
20420 
@0412 
O84208 
00432 
20448 
20450 
20442 
28470 
20482 
20490 
ABSA 
28510 
Q@@528 
Q0532 
0540 
2O55a 
@@560 
205708 
@8580 
2592 
2BSA0 
28618 
Q@B628 
20638 
20648 
@@65a 
28668 
28672 
20680 
B8698 
28722 
22710 
Q8722 
G0732 
@8742 
Q8758 
22762 
28772 
28782 
28798 
22808 
08812 
BAB20 
Q@Q838 
8842 
2850 
28860 
28878 
2BSs8a 
Q2QB9@ 
22708 
20912 
BaI20 
O2938 


@1i9 


B1ia40A 
@i@4ia 
G@i@42A 
B1i@43Aa 
@1044 

@i@45 

Biag4é 

1847 

1048 

G1a49 

@1@5a 

@i@51 

@i@sz2 

1853 

@1a54 

@i@S5A 
@1@56A 
Bi@S7Aé 
@1i@S58A 
@1@59 

Bigédaa 
BiBdsid 
BigészAa 
2iBS34 
Bigd4a 
Bi@é65A4 
BiGdséa 
Bigs7A 
BiagésAa 
BiBSssA 
B1ia7aA 
Big7ia 
@iag7Z2A 
B18734 
Bia74A 
@i@75 

@ia7éA 
Biag77A 
@i@7BAa 
Bia79A 
@i@saa 
@1@asia 
Biagsza 
BiBesAa 
BiBasa 
Bi@ssAa 
@iaB6A 
1887 

Ziassa 
BigEerva 
BiagoaA 
Bigsié 
Biageza 
BiBI3A 
Biagrsa 
@ia95A 
BiaIVSA 
Bia97A 


RTN 


QC&F 
BC7 1 
@c73 
@C75 


C76 
@C73 
BC7B 
GBC7E 


Acai 
AC84 
2CBS 
C88 
@CSe 
Q@CBE 
2CIO 
BC92 
C95 
aC97 
C99 
Q@CoB 
@C9D 


BCAR : 


aCAZ 


BCA4S 
QaCA7 
2CA? 
A@CABR 
Q@CAE 


BCBS : 


Q@CBz 
A2CB4 
Z2CBS 
A@CBS 
CBA 


Q@cBC 


Q@CBE : 
cca : 


2cc2 
ACCS 
@CCS 
acc? 
BCC 
Z2CCA 


@cCcCc = 


=] 
x 
PUIPPPPr PPP? 


BCA4 


DOS — SUPPORTING SUBROUTINES 


XFRXU EXG 
BSR 
EXG 
RTS 
¥ 


XsU 
XFRUX 
Xs 


HEEKEEEE ERE RE KRHHKEEK EERE EEREERK EE EEREER ER HHEKREEKRERE RE 


* CHECK DIRECTORY ON THIS DRIVE 

* GIVEN: A=ZERO IF LOOKING FOR A MATCH 

* A NOT ZERO IF LOOKING FOR AVAILABLE SLOT 
* U -> DCB 

* RETURNED: A=ZERO IF REQUEST SUCCESSFUL 

* A=FF IF NO MATCH FOUND 

*% A=1-8 IF 1/70 ERROR 


* IF SUCCESSFUL: X—-> 


DIRECTORY ENTRY IN BUFFER 


KEKEEEREKEEKEREKEKRERERERREREEEEEREREKEREREREEEEREE 


CHKDIR PSHS 
LDD 
STA 
STB 
CD1 LDA 
PSHS 
LDA 
STA 
LBESR 
PULS 
BE® 
STB 
CMPA 


CDIE 


CDiA 


© CHECK THE DI 
CD2 STB 
CDZA LDA 


CD3 


CD4 
PULS 

* COMPARE LOOP 

CD5 LDA 

BE 

BMI 

CLRE 

LDA 

CMPA 

BNE 

INCB 

CMPB 

BCS 


CDé 


D 
#$11@83 


SAVE OPTION 


DCBTRK:U SET TO READ DIRECTORY TRACK 
DCBSEC;:U SET TO READ FIRST DIRECTORY ENTRIES 
* RETRY ONLY IF DRIVE IS READY! 


>RETRYS 
ray 

#2 
>RETRYS 
SYSRED 
B 

CDz 
>RETRYS 
#ERRI 
CDIA 

3S 

Ds PC 
SYSRED 
CD1IE 
CDZA 
RECTORY 
>RETRYS 
#8 

1:5 
#5YSBUF 
35 

CD5 

3 X 

CD4 

CD7 

35 

Ds PC 


5X 
CD7 
CD8 


Bs X 
Bs U 
CD7 


#11 
CDé 


** CHANGED IN VER 6 ¥* 


DO PHYSICAL READ 
GET ORIG NBR OF RETRYS 
IF 1/70 OK 


DRIVE NOT READY? 
IF I SHOULD TRY SOME MORE 


GO TRY SOME MORE 
IF STILL ERROR 


ENTRIES IN THIS RECORD 


NUMBER OF DIRECTORY ENTRYS PER REC 


POINT AT SYSTEM BUFFER 
OPTION? 

IF LOOKING FOR & MATCH 
LOOK AT IST BYTE 

IF I FOUND RE-USABLE SPACE 
IF NOT USEABLE 


RETURN SUCCESSFULLY 


LOOK AT 1ST BYTE OF DIRECTORY ENTRY 
IF DELETED ENTRY 

IF END OF DIRECTORY ENTRIES 
CHARACTER POSITION COUNTER 

CHR IN DIRECTORY FILE NAME 

CHR IN DCB FILE NAME 

IF NOT A MATCH 


MORE CHARACTERS TO COMPARE? 
if YES 


PAGE 


20740 
20950 
22960 
22970 
aa78a 
22992 
21000 
01010 
a1020 
21030 
01040 
21052 
@1040 
01070 
21080 
21090 
21120 
@111@ 
01120 
21130 
01140 
21150 
@1160 
01170 
21180 
21192 
21200 
01210 
Q1220 
01230 
@1240 
01250 
01240 
21270 
21280 
01290 
21300 
01310 
Q1320 
01330 
2134 
01350 
21340 
01372 
21380 
01390 
21400 
01412 
21420 
01432 
21440 
01450 
21440 
01470 
21480 
01492 
21520 
01510 


@20 RTN 


@1298 
BiassA 
21100 
Bii@ia 
BLiazZA 
@1i1@3A 
BiL1ia4a 
@11@5A 
@iiada 
@1ii@7Aa 
21188 
@ii@a@va 
@iii@a 
@iiiia 
@iliiz 
@1113 
@1114 
@11i15 
@ii116 
@1iii7 
@1118 
@1119 
Bi120A 
Biizia 
@1iz2 
G@1123 
@iLiz4 
@11i25 
@iiz 
B1iz7Aa 
@1izeAa 
Bilz29A 
@1130 
1131 
G@lisez 
@1133 
81134 
@1135 
@1136 
@1137 
@1138 
@1139 
Bii4@A 
Bii4ia 
@i11424 
811434 
Bii44Aé 
@1ii45A4 
@1146A 
B1i47A 
@1148A 
Bili49A 
B1L1i5@A 
@iisia 
@i1is5z2A 
@1iiS53A 
@1154A 
@1i55A 


Q@CCE 2 


cde 
@CD3 
@CDS 
@CD7 
@CDA 


QCE7 
Q@CE9 


QBCEA 
ACEC 
@CEF 


Q@Cr2 
QCF4 
@Cr?7 
QCFA 
@CFC 
QCFF 
@D@i 
@Da4 
@DaS 
@Daa 


@Da9 } 


ADE. 
@DaD 
Q@D@F 
@2D1@ 
@Diz 


Bé 


BS 


&F 


BC 


a3 
C8 
C8 


22 
38 


b bDrPDPDPrrprpyprp 


8 
mo 
— 
o 


QDiB 


DOS —- SUPPORTING SUBROUTINES 


* MATCH FOUND 


BRA CD4 
¥* 
CD7 LEAX gaesX POINT TO NEXT DIRECT 
DEC isS MORE ENTRIES TO LOOK 
BNE CD3 IF YES 
INC DCBSECsU 
LDA DCBSEC;U 
CMPA #12 MORE DIRECTORY RECOR 
BCS cpi IF YES 
* DIRECTORY ENTRY NOT FOUND ON THIS DRIVE 
CD8 LDA #$FF 
STA +S 
PULS Ds PC 


* 
EREEHEEEREE REE REE EERERERREKREKRHRE REE RER EERE 


* PHYSICAL DISK READ 

* GIVEN: U->DCB 

* FUNCTION: READ INTO DCBBUF 

* (NOTE? DSKCON RETRYS ON ERROR 5 


* RETURNED: DCBOK = RESULT CODE (ALSO IN A) 

HEE EE EEE EEE EEE EEE EE EEE EEE EEE EEK 

DSKRED LDA #2 READ SECTOR OP CODE 
FCB $8C SKIP OVER NEXT INSTR 

% 

KEKE EEE EEE EEE EEE EERE EERE 

* PHYSICAL DISK WRITE 


* ESSENTIALLY SAME AS ABOVE 
HHEE KEKE EE EE EEE KERR EEE REESE 


DSKWRT LDA #3 WRITE OP CODE 
DSKIO STA DCBOPCsU 

CLR DCBMDT;:U 
* FALL THRU 


* 
HEKEKEEKEEKREEKEREEEREREREREREKREEREREREE 


* CALL DSKCON 

* GIVEN: PARAMETERS IN DCB 

*% FUNCTION: XFER PARAMS TO [C@@5] 

¥ CALL DSKCON 

* MOVE RESULT CODE TO DCB 


* LEAVE RESULT CODE IN A 
KHER KEE EEK E EEE EER EEE EERE EE EERE EEE EEE 


XFRIOP PSHS Bs X 
LDX > $CA0S 
LDD DCBOPCs U 
STD sX++ 
LDD DCBTRKsU 
STD sX++ 
LDD DCBBUF:U 
STD sX++ 
XTOENT PSHS DP 
CLRA 
TFR Ais DP 
BSR DOTO DO I/0 
PULS DP 
CLRA 
LDB +X GET RESULT CODE 
BEQ XIOX IF NO ERRORs EXIT 


ORY ENTRY 
AT IN THIS REC? 


DS TO READ? 


TIMES) 


7 
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@i528 
01530 
@1548 
@1558 
G156a 
01578 
158 
01599 
0168 
1618 
G1628 
21632 
1642 
01652 
@16468 
@1672 
214688 
21690 
0178 
1718 
01720 
81730 
21748 
G1758 
01762 
21772 
01788 
01790 
21888 
21818 
21820 
21838 
21848 
1850 
21868 
21872 
2188@ 
21892 
21928 
81918 
1928 
G1932 
21940 
1950 
21762 
21978 
01988 
81998 
22008 
22010 
@2022 
2038 
2048 
QB2058 
2068 
22078 
22080 
B209 


21 RTN 


@ii56 
@1iis7Aé 
@1i53A 
B@iiS9A 
i164 
B1Liidiaé 
Bi1i1éd624 
@1163 
@1i64 
@iiésa 
Biidé6a 
Biid7A 
@11684 
@1149 
011708 
@i1i7i 
B1i72 
@1173 
@1i74a 
Bili75A 
Bii7éAa 
@1i77A 
@1i1784 
BLi79A 
@1ii8@a 
@1isis 
@1i1i82A 
@11i83A 
81184 
1185 
@1186 
@1187 
Bii8sAa 
BiisBvrAa 
1198 
@1iivi 
B1192 
@1193 
@L1i94 
@1195 
811976 
Oiit77 
B@ii98A 
Biiv9A 
Biza@aa 
Bizaia 
Bizaza 
Bi S34 
BizB4Aa 
Bi 205A 
Bizada 
BilzZza7A 
G1 288 
Q@12a9 
@1iz1a 
@izil 
@iziz 
B@izisa 


Q@D14 
@Di5 
@D1i7 
@D18 
QDiA 
@DiB 


@DiDd 
@DiF 
@D22 
@D25 


Q@D3F 
@D41 


Q@D43 
@D46 
@D48 
@D49 
QD44 
@D4D 
Q@D4F 
@D5 1 
@D53 
@D55 


@D57 


34 


aaz4 


D622 
caa4 


a3 
E& 


78 


@DiA 


@D1i4 


a 


> 


oo a a 


aDz9 


DOS ~ SUPPORTING SUBROUTINES 


* GENERATE ERROR NUMBER BASED ON WHICH BIT IS ON 


XIOA LSLB 
BCS 
INCA 
BRA 
XIOB INCA 
XIOX PULS 
ze EQU 
* THE ABOVE 
DOTO PSHS 
LDA 
L.DX 
JMP 


* 


IS THIS BIT SET? 
XIOB IF YES 
XIOA 


BsXsPC 
ERRI+ERRZ+ERR3S+ERR4+ERRS+ERRS+ERR7+ERRS 


LINE SIMPLY PUTS ERRI-8 ON THE XREF MAP 


DsXs¥sV 
>RETRYS 


>$CAG4 
45X 


HEE EE ERE EERE EEE E KEKE EKER ERE ER EERE HE EE 


* PHYSICAL DISK 


READ -— SYSTEM FUNCTIONS 


* SAME AS DSKRED EXCEPT SYSTEM’S BUFFER USED 
ERE KEKE EEE EEE EEE EEE EE EEE EEE EERE EEE EEE EER EEE 


SYSRED LDA 
SYSIO PSHS 


* 


#2 
Bs X 


DCBDRV:U 


>$COG6 
a X++ 


DCBTRKs U 


3 X++ 


#S5YSBUF 


g X++ 
XIOENT 


TRACK & SECTOR 


FINISH UP LIKE USER I9 


KEEEEEEKEEREKEEKREREEER EERE REREREREEREEE REE 


* PHYSICAL DISK WRITE -— SYSTEM FUNCTIONS 
EEE EEE EEE EEE EERE EEE EERE EEE EERE EEE EEE 


SYSWRT LDA 


BRA 
¥ 


#3 
SYSTIO 


HIE EE EEE EEE EEE HEE EKER EEE ERE EERE EEE EEE RE EE EKER E KEE REE EEE EKER ERERERERERERE 


IF YES: 


* KK 


* 


IF DATA IN BUFFER HAS BEEN MODIFIED (DCBMDT NOT = 
TO SEE IF WRITES ARE ALLOWED. 


GIVEN: U->DCB CONTAINING DCBPRN = 


@) CHECK 


IF NOs DO NOT SET ERROR - JUST EXIT. 


REWRITE BLOCK IN BUFFER (EXIT WITH ERROR IN A IF WRITE NO GOOD.) 


PHYSICAL REC NUMBER THAT IS IN BUFFER. 


FH TE HEE EE IEE EEE IEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EE ERE EE EER EERE EEE 
DCBMDT;U DATA IN BUFFER MODIFIED? 


REWRTE TST 
BNE 
CLRA 
RTS 
LDA 
ANDA 
BEQ 
BSR 
BNE 
BRA 


RWX 
RW X X 
RW1 


* 


RW1 


DCBCFS:U 


HOUT 
RWX 
CSENT 
RWX X 
DSKWRT 


ir YES 


ARE WRITES ALLOWED? 

IF NOs EXIT WITH NO ERROR 
RE-ESTABLISH TRK & SEC FROM PRN 
IF NGs. EXIT WITH ERROR 

GO DO REWRITE & RETURN TO CALLER 


HEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EE EEE EEE EEE EEE EEE EEE EERE 
* CALCULATE RELATIVE BYTE ADDRESS FROM LOGICAL RECORD NUMBER 


* (DCBRBA = 


DCBRSZ * DCBLRN) 


KEKE EKER ERE EEE E EERE EEE ERE E KEKE KE RKEREREEREREEREEEERERREERE 


CALRBA PSHS 


Xs ¥sU 


fi 


PAGE @22 RTN »SA:@ DOS -— SUPPORTING SUBROUTINES \ 
@21@@ @12144 @D59 3a C8 2B “ LEAX DCBRBAs U 

@211@ @1iz2zi54 BDSCc Bi = ee & | i LEAY DCBRSZ:VU 

@2128 @1216A @DSF 33 C8 Ze os LEAU DCBLRNs U 

2138 @1217A @DSz2 SF 4 S CLR 3X 

@2140 @1218A @DS4 4F Zi 4 CLR 1+X 

@215@ @iz1i9A @DS46 SF 2 a CLR aX 

22168 @122@A @DS68 Ad rab | & LDA is¥ 

@2i7@ @1izZziA @DSA ES 41 eS LDB isWV 

22188 @1iz2z22A @DSC 3D MUL 

@219@ @1i223A @DSD ED @i S STD 1sX 

22008 @1224A4 @DSF AS 21 & LDA 1s¥ 

O@2210 @1225A4 @D71 £6 C4 4 L.DB 3U 

O@22280 @1226A4 @D73 3D MUL 

G22380 @1227A @D74 ES 84 a ADDD 3X 

@2240 @1228A @D746 25 iD @D95 BCS CRBAER IF CARRY 

O@2258@ 812294 OD78 ED B84 & STD 3X 

@22608 12304 @D7A Ad as & LDA s¥ 

Q@2278 B1231A @D7C ES 44 & LDB isV 

22280 @1232A B@D7E 3D MUL 

O2290 @1233A @D7F ES 84 fy ADDD 3X 

2308 @1234A @D81i 25 @D?5 BCS CRBAER 

2318 @1235A @De3 ED 84 A STD 3X 

@2320 @1236A4 @D85 Ad Sa os LDA he 4 

@2338 @1237A @D87 ES C4 6 LDB 3U 

2348 @1238A4 @De9 3D MUL 

B2350 @1239A @DBA EB 84 a ADDB 3X 

@23628 @1240A @D8C 25 a7 @D95 BCS CRBAER 

O2370 @1241A O@DSE E7 84 & STB 3X 

2380 @1242A4 @D9G 4D TSTA 

Q2390 12434 @D91 26 az @D95 BNE CRBAER 

22400 @12444 @D93 35 F@ 5 PULS Xa ¥sUsPc 

22418 @12454 BD95 84 i@ A&A CRBAER LDA #ERRIS6 

2420 @1246A @D97 35 FQ@ 5 PULS Xs V¥sUsPc 

2432 01247 * 

O27440 012748 KEKE HEE ERE EE EEE KEKE EERE EK EE EE EEE EERE ER EEK REE EEE EERE REE EEK 
@2458 @1249 * CALCULATE TRACK & SECTOR 

B2468 012508 * 

22478 @1251 * GIVEN: DCBPRN = RELATIVE RECORD NUMBER 

@248@ @1252 * FUNCTION: FOLLOW CLUSTER CHAIN UNTIL PROPER CLUSTER FOUND 
22498 @1253 * RESULT: DCBTRK & DCBSEC IF RECORD IN RANGE 
B2500 81254 * THEY POINT TO LAST SECTOR IF NOT IN RANGE. w/ 
@251@ @1255 * A = ZERO IF SUCCESSFUL 

O2528 01256 * NON ZERO IF NOT 

@2538@ @1257 EE EEE EERE EE EEE BERR RE EE EERE EER ERE RE KEE EERE EEK E EE ER ER EEE RE EEERE 
02540 @1258A4 @D99 EC C8 2B A CALSEC LDD DCBRBA;U DESIRED REC NUMBER 

@2558 @12594 @D9c ED co 27 4 STD DCBPRN;:U SAVE AS THE REC IN THE BUFFER 

@2562 @1246@0A BDIF AS 4D & CSENT LDA DCBFCLsU 

@257@8 @1261A @DAL 34 4 & PSHS As X 

@2580 @12624 @DAB BE @7C8 A L.DX #FATS 

@2590 @12634 O@DAS AS Cs Z1 a LDA DCBDRV:U 

@2600 @12644 BDA C4 45 fe LDB #FATSZ 

@2618 @12654 @DAB 3D MUL 

@2620 812464 BDAC 3A 8B & LEAX Ds X POINT TO PROPER FAT TABLE 

@263@ @1267A4 @DAE EC CS 29 4 LDD DCBPRN;U REC NUMBER DESIRED 

@2642 012684 @DBi 46D E4 a TST 15 

@2658 @1269A @DB3 ZB 15 ZDCA BMI Co3 IF AT END OF CLUSTERS (NULI FILE) 
22668 @1270A @DBS 83 22a9 A CSi SUBD #9 

@2678 @1271A @DBS 25 1B @DD5 BCS CS4 IF IN THIS CLUSTER 
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@2688 
02698 
@2780 
22718 
Q2728 
@2738 
G27408 
@275@8 
02768 
22772 
@278@ 
22792 
02800 
22818 
@2828 
42832 
428428 
422858 
28608 
022872 
G22880 
22890 

2908 
22918 
B2928 
02938 
G2948 
22954 
B2968 

2978 
@2988 
B29928 
O3008 
23018 
3028 
23038 
A3048 
@3858 
A3B5@ 
83078 
G23088 
A309@ 
G@31aa 
43118 
23120 
03138 
23148 
@315@ 
4231468 
23172 
423188 
23192 
AIZA 
@3218 
B3220 
43234 
B3248 
43250 


@23 RTN 


Biz272 

G@i273A4 
Biz744 
QizZ75A 
@iz76A 
Biz77A 
@i2784 
Qilz79A 
1280 

01281 

@1iz82 

B1iZB3A 
B1izZ84A 
@iz285Aa 
B1286A 
Bizs7Aa 
@1i288 

@1289 

B1z9@A 
Biz91 

Biz292A 
BizZ93A 
BizZ94A 
Q@iz295A 
B1296 

Q@12974 
Bi29B84 
BizZ99A 
@1 328A 
Bisaia 
G1i3a2 

G1 3834 
Bi304A 
G1 3854 
Bi 326A 
Z1i3a7A 
G1 308A 
Bi 3aPA 
1310 

BisiiA 
@isiza 
Bi3sisa 
Qi3i4sa 
@13154 
@i3i6 

Bisi7A 
@isisAa 
@isiva 
G1 320 

Biszia 
Qi 322A 
Bi S234 
13244 
@1i325A 
Gi S26A 
BiseZ7A 
Bi 328A 
Bi3z9A 


@DBA 
Q@DEC 
QDBE 
A2DCcB 
@DC2 
@DCc4 
ADCS 
Q2Dcs 


ZDCA 
@DCD 
Q@DCF 
@DD1i 
Q@DD3 


@DD5 


Q@DD7 
@DD9 


@DDB : 


@DDD 


Q@DDF 
@DE i 
Q@DES 
@DES 
Q@DE7 
@DEA 
@DEC 
ADEE 
Q@DF@ 
@DF 2 
Q@DF4 
@DF7 
Q@DF9 


Q@DFB 
Q@DFE 
Q@DFF 


QEQ2 2 
QEQ4 2 


BES 
GES 
BEA 


BEAC 
GE@F 
QE1i1 
ME1S3 


@E15 .; 


@E17 
Q@E19 
GE 1B 
@E1ID 


»SAE 


@ 


@DD 1 
AE LF 
18 A 
ray 

QE IF 


Pe 


DOS ~— SUPPORTING SUBROUTINES 


PSHS D 
LDA 235 
LDA As X 
BMI CS2 
STA 235 
PULS D 
BRA coi 
CSz PULS D 


¥ 
* REC IS BEYOND END OF 


GET NEXT CLUSTER POINTER 
IF AT END OF CLUSTERS 


CURRENT CLUSTERS 


* AM I ALLOWED TO ADD ANOTHER CLUSTER? 


CS3 LDA DCBCFS:U 
ANDA #EXTEND AM I ALLOWED? 
BNE CSé IF YES: GO TRY If 
CS3A LDA #ERR1I7 EXTENSION NOT ALLOWED 
BRA CSERR 
¥ 
* RECORD IS IN THIS CLUSTER 
CS4 ADDB #12 CRESULT is i=-¥) 
* I5 THE SECTOR NUMBER IN B IN USE IN THIS CLUSTER YET? 
LDA 15 {CLUSTER NUMBER) 
TST As X iS THIS CLUSTER THE LAST IN THE FILE? 
SPE CSS IF NO 
PSHS D CLUSTER NUMBER/SECTOR NUMBER 
* IS THIS RECORD BEYOND CURRENT LAST SECTOR USED? 
L DEB AsX 
ANDB #63 CURRENT LAST SECTOR USED 
CMPB 15S THIS ONE 
BCC CS4A IF THIS IS LESS OR EQUAL TO CURRENT END 
LDEB DCBCFS;U GET FILE STATUS 
ANDB #EXTEND FILE EXTENSIONS ALLOWED? 
BNE CS4B iF YES 
CS4AE PULS D 
BRA CS3A EXTENSION NOT ALLOWED 
CS4A BNE CS4C IF NOT IN LAST SECTOR 
LDA DCBCFS;:U 
ANDA #EXTEND ALLOWED? 
BNE CS4C IF iTS OK 
* I5 REC BEYOND LAST SYTE? 
LDB DCBRBAtZ: U 
CLRA 
CMPD DCBNLSs U 
BCS CS4C IF OK 
BRA CS4AE IF NG 
* EXTEND LAST SECTOR IN THIS CLUSTER 
CS4B LDB i:S SECTOR NUMBER 
ORB #5CO 
STB AsX PUT IN FAT TABLE 
* FAT HAS CHANGED - CAN I BYPASS UPDATE THIS TIME? 
LDA DCBCFS:U 
ANDA #F AST 
BNE CS4C iF YES 
BSR WRTIFAT RE-WRITE FAT TABLE TO REFLECT CHANGE 
BE® CS4C IF 1/0 WAS OK 
PULS D 
LDA #ERR18 FAT RW ERR 
CSERR STA 35 
PULS AsXsPC 


PAGE 


83268 
83272 
G3288 
Q3290 
3328 
423312 
G3320 
23338 
43348 
83358 
Q3362 
233708 
23388 
Q3390 
3488 
23412 
3420 
03432 
3448 
43458 
23468 
03478 
83482 
23492 
3588 
23518 
Q3528 
03538 
3548 
23558 
23562 
3578 
23582 
Q3598 
3608 
23618 
23628 
Q3638 
23648 
Q3652 
23668 
234672 
23680 
03698 
83788 
@371@ 
23728 
23732 
23748 
@3752 
23768 
03778 
23788 
3792 
23882 
23812 
23820 
23838 


B24 


Bi3S3aA 
@1331 

Bi3s32zA 
Gi 333A 
G1 334A 
@1 335A 
B1336A 
@1i337A 
Bi338A 
G@i339A 
Bi3s4aa 
Bi34iAé 
Bi3424 
01343 

1344 

@1345 

@1346 

B1i347A 
13484 
B1i349A 
Bi3saAa 
BissiaA 
i352 

G1 353A 
@1 354A 
13554 
Bi 356A 
B1i357A 
BiS58A 
Bi3S9A 
@1 3624 
Bisésia 
Bi3é62A 
G1 3634 
G13464A 
@1365A 
13664 
@i367A 
21 368A 
Bisés9A 
Bi37aA 
Bis7ia 
Bis7zZA 
Bi373A 
Bi374A 
B1i375A 
Bi3s7éAa 
Bi3s77A 
@i1378A 
B1i3S79A 
Bi3eBaa 
@iS3SBiA 
Bi 3sseza 
@1 3834 
1384 

81385 

81386 

41387 


RTN 


br>>d> OPPPOH Pr P 


TT 


DOS — SUPPORTING SUBROUTINES 


CS4c 


* RECORD IS 


CSS 


CSSA 


CSSB 


NE XT 
THIS 
36 


7% OK K 


CS6A 


*% LOOP 
CS7 


CS7A 


CS7B 


C38 


PULS D CONTINUE - IT IS NOW WITHIN RANGE OF FILE 


IN RANGE OF FILE —- XLATE CLUSTER INTO TRACK & SECTOR 


LDA 3S CLUSTER NUMBER 

LSRA IS THIS AN ODD CLUSTER? 

BCC CS5SA4 IF NO 

ADDB #9 IF YES: USE SECTORS 18-18 
STB DCBSEC;U 

CMPA #17 IS CLUSTER BELOW DIRECTORY? 
BCS CS5B IrF YES 

INCA IF NOT GO ONE TRACK FARTHER 
STA DCBTRKsU 

CLR 3S 

PULS AsXsPC 


TRY TO ADD ANOTHER CLUSTER TO THE FILE 


CLUSTER USED WILL BE THE CLOSEST ONE TO THE LAST ONE USED BY 


FILE. IF FIRST EVER FOR THIS FILEs IT WILL BE CLOSEST TO-BIDDLE. 
LDB 15 LAST CLUSTER NUMBER USED 

BPL CS6A IF NOT VERY FIRST ASSIGNED TO FILE 

LDB #34 START SEARCH AT CLUSTER 34 

CLRA STARTING DISPLACEMENT 

PSHS D 


TO LOOK FOR AN AVAILABLE CLUSTER 


LDA isS LAST CLUSTER OF FILE 

ADDA 35 ADD DISPLACEMENT 

CMPA #458 IN RANGE OF TABLE? 

BCC CS7A IF NO 

LDB As X GET FAT TABLE BYTE 

CMPB #$FF IS IT AVAILABLE 

BE@ Css IF YES 

LDA isS 

SUBA 3S LOOK THE OTHER WAY 

BCS cs7B IF NOT IN RANGE OF THE TABLE 
LDB As X GET FAT TABLE BYTE 

CMPB #$FF AVAILABLE? 

BEG cse IF YES 

LDA 35 

INCA 

STA 3S 

CMPA #493 HAVE I TRIED ALL POSSIBILITIES? 
BCS cs7 IF NOT YET 

PULS D NORMALIZE STACK 

LDA #ERRZ2 DISK FULL 

BRA CSERR 

LDB 235 ORIGINAL ENDING CLUSTER 
BPL CS8A 

STA DCBFCL;U THIS IS FIRST CLUSTER 

BRA CcS8B 

STA Bs X ADD TO CHAIN 

LDB #$CO SAY NONE OF THESE SECTORS USED 
STB Ais X 

PULS D 

PULS As X NORMALIZE STACK 

JMP CSENT GO TRY AGAIN FROM THE TOP! 


EEE EEE EEE EEE EEE IEE EEE EE EEE EEE KE EEE EERE 
* REWRITE FAT TABLE ON DIRECTORY TRACK 


* 


PAGE 


43848 
Q3852 
3868 
3872 
3880 
23892 
239A8 
23918 
A3928 
Q3938 
43940 
43958 
A396 
23978 
23988 
23990 
24008 
44018 
24020 
O4232 
2aG18 
AAG2O 
BAG34 
BB040 
Q28058 
GaA6A 
G2Qa0708 
BAAR 
BAAR 
22128 
22118 
@0128 
G01 38 
@0140 
Q@@8150 
0162 
20178 
20182 
Q@Bi9e 
BALA 
20218 
B22 
GG232 
A242 
B25 
QB260 
20278 
GG288 
BA292 
AB3028 
Q28318 
AA328 
BO338 
28340 
QQ352 
QA368 
20372 
G22382 


O25 


41388 

@1389 

1390 

Bisvid 
B1L392A 
Bi3se3A 
Bise4a 
Bi 395A 
Bi3S96A 
B1l397A 
@i 398A 
BiSI9A 
G140GA4 
@i4@aia 
Bi4aza 
14034 
@1404A4 
@i4@5Aa 
B1i4a6A 
ABi4a7Aa 
21483 

21489 

@141@ 

@i4sili 

Bi4siz2 

1413 

1414 

@1415 

@i4iéé 
Bi4si7A 
B@i4i8A 
Bi4si9Aa 
Bi420A 
Bi421A 
@i4224 
Bi423A 
Bi4244 
B14254 
Bi4264 
Bi4s274 
Bi428A 
B14294 
@14304 
Bi4s3aia 
Bi432A 
14334 
B1l4344 
@i4354 
@i436A 
01437 

@1438A4 
B1l4 394 
Bi4s40A 
B14414 
Bi4424 
14434 
Bi4444 
B1i445A 


RTN 


GE7E 
BES 
GEB3 
BESS 
@E87 
MESA 
BEBC 
QE SF 
Q@EF 1 
BE9S3 
BESS 
AES? 
BEV8 
GEDA 
BE GE 
MEAG 
QE AZ 


»5A°8 


fe 


DOS — SUPPORTING SUBROUTINES 
* GIVEN: X-> CORRECT FAT TABLE IN MEMORY 
* U-: DCR CONTAINING CORRECT DRIVE NUMBER 
FE FETE IE TE HEE ETE TE IEE EGE ETE EEE EE EEE EE EEE EEE EERE EE ER EEE EEE 
18 A WRTFAT PSHS x 
CRAS & LDX >$COGS 
3 & LDA #3 WRITE 
8a ray STA aX+ 
C8 21 & LDA DCBDRVsU 
82 & STA sX+ 
1102 A LDD #41102 TRACK 17: SECTOR 2 
81 ra) STD sX++ 
E4 ray LDD 3S ADDR OF FAT TABLE 
81 4 STD a X++ 
a8 os PSHS DP 
CLRA 
BE A TFR As DP 
SF COA4 A JSR C#C@@4] Do Io 
ate & PULS DP 
84 4 LDA 5X RESULT 
Fe A PULS Xa PC 
¥ bee DOS — PAGING & OVERLAYS 
% 
FE HE HE HEHE IE FE IE FE IE IE FE FE FE FE FE EE FE FE FE FE IE FE FEE FEE SE FE IE FETE FE FE SE EEE EEE EEE EEE EEE EE EEE EEE EEE EE ERE ER ERE 
% ON DISKs THIS PROGRAM BEGINS HERE! EVERY THING THAT PRECEEDS THIS POINT 
* IS RECORDED ON DISK AFTER THE END OF THE OVERLAYS. WHEN DOS IS FIRST 
* LOADED INTO MEMORY: THE ROUTINE CALLED "OVRLAY" SHIFTS THOSE ROUTINES 
* DOWN TO THEIR PROPER PLACE. 
3 FE SE IE FE IEE FE IE IE IE FEE ETE TE FE SEE EGE FE TEE HEE ETE EE TEE EE EEE EE EEE EEE EEE EERE EEE EEE EEE REEEEEEEEEE 
GE CF A&A DOS JMP Dosi JUMP OVER DISPLACEMENTS TO OVERLAYS 
A329 a FDEB Bi-bDos 
A35C A FDB B2-DoOS 
B37E a FDB B3-DOS 
ASAE ray FDB B4-DOS 
8442 & FDB B5-DoOsS 
A529 A FDB BS-DOS 
A607 a FDB B7-DOS 
@41@ A FDB B8—-DOS 
@S519 ray FDB B9-DOS 
A622 & FDB Bia@—DoOsS 
MSEA & FDB Bii-DOSs 
A762 A FDB Biz-DOS 
a7D?F ray FDB Bi3s-DOS 
Ged & FDB Bi4—-D0S 
fied id a FDB Bi5-DoOS 
ASB4 & FDB Bié—-DOs 
BASF 4 FDB Bi7-DOS 
ACasS A FDB Bi8—DOS 
ACAL a FDB Bi9-DOS 
BDA & FDB B20-DOS 
* MINIMUM INITIALIZATION FOLLOWS 
posi Dos DOs INIT GO INITIALIZE (MENU ETC) 
TSTA 
4 AEDC BE Dposz 
SF @616 A JSR CERROR J] 
OFFS A& Dose JMP OBASIC 
1G@Az A&A DOSS LDD HOVRLAY 
@625 A STD SOLYLOC 
RTS 


BE a 


PAGE 


@A398 
22402 
20412 
Q2428 
20432 
28442 
A045 
O8440 
28472 
20480 
22498 
QQ5ae@ 
@051@ 
Q@520 
G@538 
B2Q542 
@@552 
B2548 
Q@2578 
BA58aQ 
2@578 
20622 
G61 
Q2Q628 
BB632 
22648 
2065a 
22662 
28672 
22680 
28692 
28782 
28718 
28722 
287328 
22742 
28752 
20762 
22778 
22782 
22792 
Q2BB8AG 
28812 
288228 
2832 
22842 
28852 
22862 
22872 
2288 
2289 
Q2BIAA 
2291 
2B920 
28938 
28742 
2895 
22760 


B26 ML 


@1446 
1447 
@1448 
@1449 
@1458 
Bi451i 
@1452 
@1453 
i454 
14554 
Bi456A 
@i457A 
@i453A 
B1l459A 
B@i4éaa 
Bi4éid 
@14624 
Bi463A 
Bi4ss4a 
@14465A4 
B1i4ééA 
Bi4sd7A 
B1458A4 
Bi4459A 
B147@A 
Bil47iAé 
B14 724 
Q@1473A 
Bi474A 
@1475A 
1476 
Q@1477A 
14784 
214794 
Gi148@A 
Bi4sBiA 
i432 
B1i4834 
B1484A4 
2143854 
@14864 
21487 
01488 
21489 
21492 
i471 
Bi492ZA 
Bi493A 
14944 
14954 
Zi4s9bA 
B1L4974 
B1i49BA 
Zi4s994 
G1i5aa 
@i5@1i 
21582 
B1503 


BEES 
@EES 
GEER 


BEEC : 


Q@EEE 
QEF@ 
G@EF2 
@EF 4 
BEF S 
BEFS 
QEF9 
@EFB 
@EFD 
QEFF 
QF Be 
QF Qi 
QF Az 
GFa3 
QF AS 


QF? : 


QFayz 


OF Ae. 
@F@D 
BF1@ 
@Fiz 
QF 13 
QF is 
Q@F1i8 
OF iB 


Q@FiD : 


QF iF 


» SAB 


DOS ~— PAGING & OVERLAYS 


¥ 
ERE EKER EEE EEE EERE EEE EE EEE EEE EEK EEE EEE EEE EEE EEE EE EEE EER 
* 8 BIT PRINTER DRIVER 

* GIVEN: A=CHR TO BE SENT TO PRINTER 


* RETURNED:A IN TACT 
* CC = Z CONDITION IF SENT OK 
% CC = NON-Z IF PRINTER NOT READY — TRY AGAIN 


EEE EEE REE EEE EEE EK EEE EEE EKER EEE EEE EEE EEE EERE EEE EEE EEE 
* IS PRINTER READY? 


DPRNT PSHS Ds xX 
LDA >U4BDR 
LSRA 
BCC DP i IF READY 
LDA #1 SET NON-Z CONDITION 
PULS DsXsPC 
DP i PSHS iG SAVE INTERUPT STATUS 
DSABLI NO INTERUPTS DURING HARD LOOP TIMING 
LDA 13S CHR TO SEND 
CLRB 
BSR LPSND SEND START BIT 
LDB #8 BITS TO SEND 
PSHS B LOOP COUNTER 
DP2 CLRB 
LSRA 
ROLB 
ROLB 
BSR LPSND SEND THE BIT 
DEC 35 
BNE DP2 GO BACK FOR NEXT BIT 
PULS B 
* INITIATE STOP BIT (IT CONTINUES UNTIL PRINTER SAYS "READY") 
LDB #2 
STB >U4ADR 
PULS $y te RESTORE INTERUPT STATUS 
CLRA SET ZERO CONDITION CODES 
PULS DsXsPC 
LPSND STB >U4ADR LATCH BIT TO OUTPUT 
L.DX >RATE TIME CONSTANT FOR TRANSMISSION 
LPDLP LEAX ~1sX 
BNE LPDLP 
RTS 


EEE EEE EEE EEE EEE EEE EEE EEE KEE EERE EE EEE EEE ERE HEE 
* TURN ON OR OFF A TIME DRIVEN ROUTINE 


* GIVEN: U-> START OF ROUTINE THAT FOLLOWS SPECS 
EREEEEKR EERE REE REE EERE EE EERE RE EE EEE KEKE EER KER REESE 
DTMEON PSHS DsU 

TSTA RE@ FOR ON OR OFF? 

BEQ DTMEOF IF OFF 

L.DD > IRQ+1 

STD 1:VU 

LEAU 33U 

STU > IRQ+1 

PULS DsUsPC 


* 
EERE EERE EEE EE EE EEE EE EKER EEE 
* TURN OFF A TIME DRIVEN ROUTINE 
* GIVEN: U -> START OF ROUTINE 


So5555 . Ea 


= 


PAGE 


20972 
B22°98a 
Ga99A 
BisaAag 
@1@1a 
@1a2a 
A183 
01848 
@1@59 
21860 
@1072 
21882 
@ia7a 
21100 
1118 
1120 
@1138 
01148 
1150 
01160 
@117@ 
01180 
@1190 
Q21200 
01210 
1220 
Q1232 
21240 
@1258 
21260 
@1272 
1280 
21292 
G138@ 
21318 
@1328 
01338 
41340 
81358 
41368 
21372 
1380 
1398 
i408 
01418 
142 

21432 
1448 
01458 
1468 
01478 
1488 
1492 
@i5aa 
B151@ 
1520 
@153a 
21540 


@27 ML 


Bis5a4 

@1i5@a5A 
B@iS5@éA 
BiSa7A 
Bi S5@8A 
BiS5a9A 
@i5ia@Aa 
@isiia 
@i5i2A 
@i513A 
@iS1i4Aé 
@iSi54 
@iS5i6A 
B@iS5i7A 
i518 

@1519 

Bis5204 
@i5214 
Bi 522A 
BiS23A 
@i524 

@iS525 

i526 

i527 

@is28A 
Bis29A 
BiS3GA 
@iS3iA 
@i532A 
B1i533A 
BiS34A 
@1i535 

@1536 

@1537 

@1538 

@1i539 

21548 

@i541 

@1i542A 
@1543A4 
BiS544A 
@1545A4 
15464 
Q@iS47Aé 
@1i548A 
@1i549A 
@1i55@4 
BiS55iA 
@i552A 
@1553A 
@iS554A 
@i555A 
@iS556A 
BiS557A 
@iS558A 
BiS59A 
Gi56@0A 
BiS5é6iA 


@F3i . 


QF33 
QF35 
Q@F38 
QF3A 
Q@F3D 
QF 3F 
QF41 
QF 43 
QF 45 
QF 47 
QF49 
OF 4B 


QF 4D 
OF 4F 
OF51i 
QF53 


@F55 
@F58 
AF SB. 
@FSE 
QF 61 
@Fé2 


QF64 2 


Q@F66 
QF 68 
@F 6B. 
fF 6D 
QF oF 
QF 71 
QF72 
QF 74 
QF 76 
QF 78 
@F7A 
AF 7C 
@F7E 
AF SQ 
@F83 
@F 85 
@F 88 
QF BA 
AFSC 
QF SE 


Bb628 


BB 
EF 


bDrPDPTLr 


& 


4 


A 
@F55 


>PPrrPrrrppyp 


DOS — PAGING & OVERLAYS 


KEEEEREKEEEKEKREEREEREREK EER EER EEREEREE 


DTMEOF LEAU 3sU ADDR STORED IN CHAIN 
PSHS XsU 
LDU #IRG+1 

DTO LDX UJ LOOK AT ADDR OF NEXT ROUTINE 
CMPX #STDTME IS IT END OF CHAIN? 
BEG DTOZ IF YES: GET OUT 
CMPX 235 IS IT THE ONE SOUGHT? 
BED DTO3 IF YES 
TFR Ds VU 
LEAU —2a 
BRA DTO 

DTOZ PULS XU 
PULS DsUsPC 


* X POINTING AT DESIRED ROUTINE 
* U POINTING AT WHERE THAT POINTER CAME FROM 


DTOS LDX ~2EX GET ADDR THAT DESIRED ROUTINE POINTS TO 
STX 3U UNLINK HIS ROUTINE 
PULS XaV 
PULS DsUsPC 


* 


He HE EEE TEE EE HEE EEE EE EEE KERR EEE EEE ER EEEHHERER ER ERE EEE EK ERE EEE 


* STANDARD TIME ROUTINE - LINKED IN BY INITIAL START UP ROUTINE 
HEE EEE EE EEE EEE EE EE EEE EEE EEE EEE EERE REE HERE EEE EEE EEE EEE EERE 


STMX JMP *@ 
STDTME LDD > CLOCK 
INCD 
STD 7 CLOCK 
CLRA 
TFR As DP ENSURE ROM ROUTINE USES PAGE ZERO 
BRA STMX 


* 


He ETE IE IEE EE EEE EE EEE EEE EERE EEE KEKE HERE EERE RHEE EE RRERKEREHE 


* CALL A SYSTEM OVERLAY 


* GIVEN: OVERLAY NUMBER IN 


(OR USER OVERLAY) 
o A” 


* OVERLAY IS LOADED IF NOT PRESENT IN MEMORY 


* NOTE: X IS NOT PRESERVED -— USED FOR OVERLAY BASE ADDRESS 
FE IE FE IE IE EEE TE EE ETE ETE HE EEE E IEE EEE EE EEE EERE EHR REE RHEE EREE EE REE 
USROLY ORA #$8O 
SYSOLY LDX SOLYLOC POINT AT CURRENT OVERLAY LOAD AREA 
CMPA —~isX IS THE DESIRED OVERLAY ALREADY THERE? 
BE® SYSO3 IF YES 
PSHS B 
TSTA SYSTEM OR USER? 
BMI SYSoO1 IF USER 
BSR SYSLOD LOAD THE OVERLAY 
BRA SYSo2 
SYSO1i BSR USRLOD LOAD THE OVERLAY 
BEQ SYSo2 IF OK 
PULS Bs PC IF LOAD ERROR 
Syso2 PULS B 
SYSO3 LDX #SYSO4 WHERE TO GO ON THE WAY BACK FROM THE OVERLAY 
PSHS x 
LDxX SOLYLOC OVERLAY LOAD AREA 
LEAX Za X ENTRY POINT WITHIN OVERLAY 
PSHS x 
LEAX —2aX PROVIDE USER WITH HIS BASE ADDRESS 
PSHS Bs X 


a ee hl 


PAGE @28 ML »5A:8 DOS —- PAGING & OVERLAYS ( } 
@155@ @1562A @F9G EC 84 ra LDD 5 X GET SIZE OF OVERLAY 

@156@ @15434 @F92z 3a 8B A LEAX D:X POINT TO END OF OVERLAY 

@1578 @15464A @F94 38 a3 A LEAX 35% POINT TO BASE OF NEXT OVERLAY AREA 
@i58@ 015454 @F94 BF A625 A STX SOLYLOC 

@i59@ @15466A @FS9 35 94 a PULS Bs XsPC BASE ADDR OF OVERLAY 

@16@@ @1547 ¥% 

@161@ @1568 * ON THE WAY BACKs ADJUST OLYLOC 

21620 015494 @FOBR A SYSO4 PSHS CCsDsX 

@i63@ @15784 @FI9D a LDX SOLYLOC 

@2154@ @1571A @FAa a LEAX 34 X 

@1i45@ @1572A @FAz as LDD 5 X GET SIZE OF THIS OVERLAY 

@166@ @1573A4 @FA4 NEGD 

@1670 @1574A4 @FA9 A LEAX Ds X POINT AT BEGINNING OF OVERLAY I AM EXITING 
@i68@ @15754 @FAB A STX ZOLYLOC SAVE IT 

@169@ @15764 @FAE a FULS COsDsXsPC 

@17@@ @1577 te 

@ivi® @i578 HERE E EEE EERE EERE EERE EEE EE RHEE REE EEE EEE KHER REE E ER KEKEEE 
@i7vz2@ @1579 * RETURN FROM ONE OVERLAY & XFER CONTROL TO ANOTHER 

01730 01580 * GIVEN: STACK NORMALIZED AS IF READY TO RTS FROM AN OVERLAY 
017408 @1581 % A = DESIRED OVERLAY NUMBER 

@175@ @1i582 EEE KEELE EEE REE EEE EEE EE EEE REE EEE EERE EEE EEK HERE KE REE HERE E 
@1i768 @1i5834 @FB@ BA 82 & DUSRGO ORA #EOQ 

@1778 @15844 @FRS 34 BS A DGO PSHS D SAVE D 

@i78@ @i585A4 @FR4 EC 64 oa LDD 455 {RET ADDR TO SYSO4) 

@1798@ @1586A4 @FBS ED 62 a STD 235 

@i8@@ @1i587A @FBS cc AF 463 ra LDD #SYSOLY CAUSE "RETURN” TO SYSOLY AFTER "UNDOING" 
@181@ @15884 @FBR ED &4 oa STD 455 

@i82@ @1589A @FBD 35 86 a PULS Ds PC RETURNS TO SYSO4 

@183@8@ 01598 * 

ALB44 @issvi ERE E EH HEER ERK ERR ERE KERR ERE ERK HERE EER EE HEE EREE 

@1i85@ @1i592 * LOAD A SYSTEM OVERLAY (OR USER OVERLAY) 


* GIVEN: A = OVERLAY NUMBER 
EEE KEKE EEE EE EEE EKER EEE EEE EER EERE KER ER EREE 


21868 @1593 
@187@ @1594 


@1880 @1595A @FRF BA Ba A USRLOD ORA #580 
@1i89@ @i5964 @FC1 34 68 A PSHS Ys 
@19@@ @1597A @FC3 1Q@BE 8627 8 LDY *USRBSE 
@191@ @1598A @FC?7 CE @697 A LDU #USRDCB 
@1i920 @1599A @FCA 8D 7A 1846 BSR PAGEIN LOAD THE OVERLAY 
@i93@ @ié6@@A @FCC 2 @2 QFD@ BEG SLDX IF LOADED OK 
019748 @16@1A @FCE 86 17 ay LDA #ERRZS ) 
@195@ @16@2A @FDB 35 E@ A SLDX PULS YsUsPC i, 
@i76@ @16@3A @FD2 34 62 A SYSLOD PSHS Ya 
@1i97@ @16@44 @FD4 1@8E @EAS A Bh #DOS+1] LOC OF OVERLAY’S RBA TABLE IN MEMORY 
Biv8@ B@ié6é@5A @FDS Ce @635 A LDU #DOSDCB POINT AT SYSTEM’S DCB 
21998 @16864 @FDB B&D &F 1246 BSR PAGEIN LOAD THE OVERLAY 
£420 @16074 @FDD 24 az @FE i BNE ABORT IF SYSTEM FAILURE 
@201@ @16@8A @FDF 35 E@ A PULS YsUsPC 
B2G28 B16a9 * 


Q@2038 @1618 
@2040 @1611 
@2058@ @1612 


HEEL EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EE EEE EEEE 
* FATAL ERROR OCCURRED IN DOS ~— CAN’T PROCEED 
EEE EERE EEE EEE EERE ER EERE EEE EEE REE EER ERK ERER 


@2060 @1613A @FE1 SE B42 & ABORT LDX #S408 VID 
@2070 @1614A @FE4 CE 1@@D & LDU FABTMSG 
@2080 @1615A @FE7 Cé i@ A LDB #16 

B2O9A @1i616A @FES 17 FC7B @C47 LESR XFRUX 

@210@ @1617A @FEC CE 4208 A LDU #$400 

2118 @1618A @FEF Cé F@ A LDB #256-16 
B2i20 B1619A @FF1 17 FC73 @C67 LBSR XFRUX 


CE TS! 


PAGE 


@2138 
2148 
2150 

Q2168 

@2178 

Q@218@ 

2219 

2200 

22218 

B2228 

B2238 

B2242 
2258 
2268 

82278 

B2288 

B229 

2388 

2318 

23208 

G233 

2342 

2358 

2362 

2370 

Q@2388 
2398 
2488 

@2412 

2422 

2438 

B2440 

2458 

2462 

22478 

G2488 

22498 

O250a8 

@251a 

82520 

O2538 

@2540 

B2558 

@2568 

Q@2578 

@258@ 

G@2592 

O2602 

2612 

@2628 

Q2638 
2648 
2658 

{2568 

2672 

B2688 

Q2698 

A272 


@29 ML 


B1620A 
B1ldéz21A 
Bi6é224 
Bids3A 
BL1d6244 
@ié25A 
Bidé26A 
BidzZz7A 
@ié284 
Bidéz29A 
Bi 6344 
Bié3iAé 
@14632 
41633 
1634 
@1ié635 
@1636 
B14637A 
@1638A 
B14639A 
B1648A4 
@16414 
B1642A 
B1ib43A 
Bid44A 
B1idé45A 
Bid46A 
@1647A 
@1648A 
Bid47A 
1458 
1651 
1652 
@1653 
@1654A 
@ié55A 
@1656A 
@1657 
@1658 
@i1659 
2146468 
@iéé61i 
B1é662 
@1663 
216564 
@16465 
16664 
@1667A 
B14468A 
Biéé69A 
@1ié7@8A 
Bidé7iA 
Q1ié72A 
Bié73A 
@1i674A 
B1é75A 
Blid76A 
Q@ié77A 


1246 
1849 
1Q@4B 
1@4D 
1@4F 
1@5a 
1@51 
1253 
1@56 
1859 
1@S5c 
1Q@5F 


34 


35 


56 


E& 


Se 

TI 

Ti 

Tl 

Ti 

Tj 
rPPrPrPryphD> b> > 


rDPD 


rPrrrprpyp 


DOS —- PAGING & OVERLAYS 


OBASTIC 


OBAS 1 


ABTMSG 


* 


BSR 
TSTA 
BEG 
LDS 
JSR 
DOs 
CLR 
JMP 
FCC 
FCB 
FCC 
FDB 


DERR WAIT FOR A KEYSTROKE 
OBAS 1 
#STACK 
DOSS 

DOs MENU 
$71 
C$SFFFE J 
#SYSTEM/ 
$48 
FAILURE / 
$6068 


RESET STACK & OLYLOC 


HEE EEK EEE EEE EERE EEE EEE EER 
* USER ABORT ROUTINE 


* GIVEN: ERROR NUMBER IN &A 
KEKE KEKEKEK EEK KE REE EE KEREE 


DERROR 


DERR 


* 


IPR 
LDA 
PSHS 
L.DD 
LDY 
LDU 
BSR 
PULS 
TFR 
BSR 
SYSTEM 
BE® 
RTS 


AsB 

#1 {ADD 256 TO IT) 

D SAVE FOR LATER 

#50 START OF INSTRUCTIONS 
#49 END OF INSTRUCTIONS 
#@ CLEAR SCREEN FIRST 
DOMAP GIVE INSTRUCTIONS 

D 

Ds ¥ 

DOMAP DISPLAY ERROR 

POLCAT WAIT FOR ANY KEYSTROKE 
DERR 


KHHEEERKREKKHEEKKEEHRRREKREREER 


* DO MAP DISPLAY FUNCTION 
ERHEEE EERE EERE EEE RE EEEEE 


DOMAP 


* 


PSHS 
DOS 
PULS 


Ds ¥sU 
DOs MAP 
DsY¥sUsPC 


ERE KEKE EEE EE EE EEE EE EEE EEE EEE EE EEE EE EEE EKER EEE EE EEE EE EE EEE EEE EERE REE REE 
*¥LOaAD 0 


* 
* 
* 
* 
* 


PAGEIN 


U-> 
Y-> 


Vs ae OE ROUTINE 


GIVEN: A=OVERLAY NUMBER 
PROGRAM DCB 
TABLE CONTAINING RBA’S OF OVERLAYS 


THE FILE MUST HAVE PREVIOUSLY BEEN OPENED! 
EKER KEE EEE HEE EEE EEE EEE EERE EEE EEE EER EEE EERE EE EEE EEE EEE EEE EEE EEE ER ERE EEREE 


LDX 
STA 
TFR 
ANDB 
LSLB 
CLRA 
LDD 
ADDD 
CLR 
STD 
LDD 
STD 


POLYLOC 
~isX 
AsB 
#$7F 
2 BYTES PER VECTOR 
Ds ¥ GET RBA OF START OF OVERLAY 
#5 ADJUST TO RBA WITHIN DISK FILE 
DCBRBA:U 
DCBRBA+1;U 
#2 LENGTH OF A SIZE FIELD 


DCBRSZ:U SET TO READ 2 BYTES 


PAGE 


2718 
2728 
2732 
B2748 
82758 
2762 
2772 
82788 
82798 
22808 
@2812 

2828 
2832 
2848 
22852 
82862 
2870 
82888 
82898 
82908 
22918 
B2928 
22932 
22948 
22958 
2962 
22970 
02982 
@299 
23082 
23018 
B3B20 
3032 
23042 
23058 
23062 
23072 
2388 
2309 
23180 
03118 
Q3120 
03132 
23142 
@315@ 
03148 
3172 
3182 
03198 
23208 
23218 
3222 
03238 
23248 
Q3258 
3268 
Q3270 
Q3282 


@32 ML 
Q1i67B8A 
Q1iS79A 
@1468QA 
Q1iSsia 
Q1468zA 
16834 
Q14684A 
B1i4S5a 
QiSssa 
Q1iS87A 
@1468sA 
B1idB9A 
Q1469A 
B1id9iA 
QiS9ZA 
B1iS93A 
Q1S94A 
Q1iS95A 
Q1S96A 
Q1idS97A 
Q1 498A 
Q1id99A 
a1720 
@17@1 
a17a2 
21783 
1704 
B1i7Q5A 
Qi7Q6A 
Qi7Q7A 
@17@8 
Q17a9A 
21712 
@i711 
Q1i712 
@1713 
@1714 
@1i715 
Q1716 
@1i717 
@1718 
@1719 
@1720 
Bi7Z1A 
Qi7Z2A 
Q1i7Z3A 
Bi7Z4A 
Q1i7Z5A 
Q1i7Z26A 
QBi7Z7A 
@1728 
B1i7Z9A 
Q173QA 
Bi7B1iA 
Qi 732A 
@1733 
Q1i734A 
Q1735A 


1262 
1@65 
1868 
1@46B 
1@6D 
1@éF 
1872 
1@75 
1877 
1879 
1@7B 
1@7E 
1281 
1883 
1@84 
1@85 


i@BeR 2 


1@aD 
1@8F 
1Q92 
1294 
1@95 


1896 
1a9C 
1Q9F 


1@Ai 


1@Az 
1@A5 
1@As 
1@AC 
1@AE 
1QB@ 
1@B2 


1@B4 
1@B7 
1@BA 
1@BC 


1@BF 
1@C3 


AE 
if 


C8 
i5 


ae 


B2 


iipprprprprpppurbpDptr 


bYd 


oprpppprp 


184 
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DOS —- PAGING & OVERLAYS 


STX DCBLRBsU 
LDD HEFFFF 
STD DCBPRN;:U FORCE INITIAL PHYSICAL READ 
BSR PIRD 
LEAX zaX 
LDD CDCBLRBsU] LENGTH OF ROUTINE (INCLUDING SIZE WORD) 
STX DCBLRB;U WHERE REST OF OVERLAY GOES 
LEAX Ds X POINT TO END OF OVERLAY + 2 
STD —~29X SAVE HIS SIZE AT END 
CLR 3X SAY NO VALID OVERLAYS FOLLOW 
SUBD #2 Size OF THE REST 
STD DCBRSZ:U SAVE AS RECORD SIZE 
BSR PIRD 
CLRA 
RTS 

PIRD DOS READ: RBA 
BES PIERX 
LEAS 235 BYPASS RET ADDR 

PIERR LDX POLYLOC 
CLR 3X SAY THIS OVERLAY DOSN’T EXIST IN MEMORY 
TSTA SET COND CODES 

PIERX RTS 


* 

HEE E EE EERE EEE EEE EEE EEE EEE EEE EEE HEE EEE EEE EE EEE EEE 
* MINIMUM LOGIC TO LOAD & PASS CONTROL TO USER PROGRAM 
* JUMP HERE FROM OVERLAY 12 

HEEL EKER EE EEE EEE EEE ERE EERE EEE EE EE EEE EEE EEE EEE EEE EEE 


BiZza DOS READ:RBA READ IN THE ROOT SEGMENT 
LDX DCBLRB;sU BASE OF PROGRAM 
TFR Xs PC JUMP TO ROOT 
¥ 
FCB @ PLACE WHERE NUMBER OF IST OVERLAY LOADED GOES 


¥ 

EEE EEE EE EE EEE EE EEE EEE EE EEE EEE EEE EE EEE EEE EEE EE EEE EEE EEE EEE EEE EE EEE EEE EEE 
* OVERLAY S20 7:20 8 Foe LL ees 

*® ALL SECTIONS THAT FOLLOW ARE RELOCATABLE. 

* (THE FIRST OVERLAY IS LOADED AT THIS ADDRESS) 

HEE KEKE EEK EEE EEE EE EEE HEE EEE EE EEE EEE EEE EE EE EEE EEE EEE EEK EEE EEE EEE EE EERE EEE 


& 
* THE FOLLOWING ROUTINE SIMPLY SHIFTS PART OF DOS DOWN TO $989. IT 
* IS LOADED AFTER THE END OF THE REST OF THE PGM SO AS TO PREVENT 
* CONFLICTS WITH BASIC. 
* IT IS CLOBBERED WHEN FIRST OVERLAY IS LOADED! 
OVRLAY LDX #LASTPG 
LDU #B989 
LDY #DOS-ORGIN AMOUNT OF PGM TO XFER 
OVLP LDA sX+ 
STA sU+ 
LEAY “is ¥ 
BNE OVLP 
* INITIALIZE VECTORS AT $6@@ 
LDU #$50 
DX #VECINI 
LDB #ENDVEC-VECINI 
JSR XFRXU MOVE IT TO #600 
* FROM THIS POINT ONs VECTORS AT $46@@ MAY BE USED 
LDS #STACK 
LDX > IRQ+] VECTOR TO DISK ROM TIME ROUTINE 


OT a 


PAGE 


O3290 
23328 
@3318 
@3320 
83330 
43348 
43358 
@3342 
033708 
23388 
43398 
23408 
03418 
03428 
03438 
234408 
03458 
3344 
23472 
03488 
23498 
23508 
@351@8 
03522 
435308 
83548 
@355@ 
235468 
43572 
43588 
Q3590 
034688 
43618 
23622 
03638 
03648 
03658 
23650 
23678 
23688 
A3692 
23728 
@371@8 
O3728 
43738 
03748 
03758 
23768 
03778 
03788 
237978 
A238aa 
23812 
23822 
23830 
B3848 
43850 
238460 


@31 ML 
B1736A 
Bi737A 
@1738A 
B1i739A 
@1 7404 
@i74iA 
i742 

@17434 
Bi744sa 
17454 
Bi746A 
Bi747A 
@1748A 
B1i749A 
@i75@A4 
Bi751A 
@1i7524 
@17534 
Bi754A 
@1755A 
@1756A 
@1757A 
@1758 

Q@1i759A 
@1 768A 
Bi7diAé 
@1762A 
@17463A 
@1i764A 
@1i765A 
B1i766A 
B1i767A 
@1748A 
B1i769A 
@1778A 
@i77iA 
Bi772A 
@1773A 
@1774A 
Bi775A 
Bi77SA 
Q1i777A 
@i778A 
@17794 
@i78BA 
@i78iA 
17824 
17834 
B@i784A 
@1i785A 
@1786 

Bi7B7A 
@1788A 
@1789A 
Gi 792A 
@i791A 
Bi792A 
Q@1i793A 


DOS — PAGING & OVERLAYS 


4 LEAX So BYPASS CHECK FOR WHICH INTERUPT IT IS 
A STX >TRQ+1 STORE REVISED ENTRY POINT 
& LDU #STMX 
DOS TIME: ON 
A LDD +POLCAT ADDR OF ROM KBD SCAN ROUTINE 
oy STD *KEYIN SAVE IN KEYIN VECTOR 
* DETERMINE MEMORY SIZE 
A LDX #E7FFF END OF 32K 
A LDA sX 
COMA 
4 STA 3X 
& CMPA aX 
i@E9 BE OVLP1 IF 32K MACHINE 
& L.DX #$3F FF FOR 14K 
A&A OVLPI STX >MAXMEM 
a LDA #4 MAX NUMBER OF DRIVES 
& STA DRIVES 
& LDU #DOSDCB 
A LDS #STACK 
a JSR Doss 
DOS OPENs INPUT READ ONLY 
& JMP DOS 
* 
A VECINI FDB DOPEN POINTER TO OPEN FUNCTION 
& FDB DCLOSE 
A FDB DREAD 
& FDB DWRITE 
& FDB DRELSE RELEASE 1/0 BUFFER 
a FDB SYSOLY CALL SYSTEM OVERLAY 
& FDB DGO JUMP BETWEEN SYSTEM OVERLAYS 
es FDB SYSLOD LOAD A SYSTEM OVERLAY 
& FDB USROLY CALL USER OVERLAY 
ray FDB DUSRGO JUMP BETWEEN USER OVERLAYS 
& FDB USRLOD LOAD A USER OVERLAY 
& FDEB DERROR USER FATAL ERROR EXIT 
ms FDB DTMEON TIME ROUTINE ON/OFF 
A FDB DPRNT § BIT PRINTER DRIVER 
A FDB a SLOT FOR KEYIN 
& FDB OBASIC RETURN TO BASIC 
a FDB @ INITIAL CLOCK VALUE 
a FCB pe | INITIAL RETRY COUNT 
A FDB $AE PRINTER TIME CONSTANT 
4S FDB OVRLAY LOAD ADDRESS FOR NEXT OVERLAY 
A FDB @ BASE ADDR OF USER PGM + 1 
& FDB RETURN HOOK 1 
A FDB RETURN HOOKS 
A FDB RETURN HOOKS 
& FDB RETURN HOOKS 
By FDE RETURN HOOKS 
A FDPB. $3939 RETURN CODE FOR HOOKS 
* INIT COPY OF DOSDCB 
& FCC /DoOS BIN/ 
Fay FCB iss @50:0;0:8;:8:03 
i FCB 30:0:0:0:0:0:8:;80:80:8:8 
A FCB fi, $FF:8:@ 
A FDB SYSBUF 
& FCB Fa 
ral FDE SYSBUF 


PAGE 


3872 
A388 
Q389 
23988 
23912 
Q3922 
23938 
23948 
A395 
2396a 
3978 
23988 
23998 
O4208 
242018 
04028 
84238 
240428 
2405 
24062 
24072 
24082 
B2G18 
AAA 
QAAIA 
QQ042 
AAAS A 
Q2A052 
2BA7 a 
BABA 
A2AAIA 
28108 
@@11i@ 
O@1z 

28138 
00148 
@@is5ea 
28162 
22178 
22182 
2B1i9a 
AAZAG 
Q@8218 
QB220 
ABV238 
Q2QA240 
AB2S52 
QB246@ 
28278 
Q@A28 
Q2B298 
A2AIA@ 
BA318 
AASz 

QB338 
B2342 
QA352 
BA348 


Q@32 ML 
Bi794A 
@1i795 

Zi7 976A 
QBi797A 
Q1i798A 
Bi799A 
i agaaa 
Bissaia 
G@isBazA 
@1iBaa4 
Q@iaa4 

@isasa 
BLlaada 
Bisa7A 
Bi Basa 
BiBavA 
Bisiaa 
@isiia 
Bisiza 
@1813 

Bisi4a 
@1815 

1814 

@1817 

@1i8i8 

@1819 

Bisz2aa 
Biszi 

Bila22A 
Biss3a 
Bisz4a 
BiBz25A 
@is25A 
Bisz7A 
Giszea 
Bise74 
@isg3saa 
BiSs3ia 
Bia83zZA 
QB1iB334 
DiB34A 
Q@i8354 
Q@1i8364 
Bis37Aa 
Bis3asa 
BiB3z7A 
1842 

1841 

1842 

01843 

18444 
Bis45A 
Z1iB46A 
BiB47A 
818484 
B1849 

Qissaa 
Bissia 


1162 


1164 
BF fe 
.Lfe 
118A 
118E 
1198 
1191 
1i9S 


119R 
L1A6 
LiAF 
1iBB 
1iBF 
11Ci 
11C2 
11c4 


11¢cc 


11CD 


L11icr 
11Dz2 
11Dé 
11D9 
1ip¢ 
11iDF 
L1iE1 
TIES 
LiE5 
Lie? 
LLE9 
11iEB 
LIED 
11iEF 
LiF i 
1iF2 
LiF4 
1iFA 


1208 
1282 
12@5 
1289 
12@Cc 


12@F 


iZiz 


Fal a a 
A208 
O22 
AAAA 
1@3c 


@6597 
3@ 


DbDrDrprrprprpp > 
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DOS ~ PAGING & OVERLAYS 


FCB 2:150:0:0;:0;:8;58 
* INIT COPY OF MSGDCB 
ae © /D05 BAS / 
FCB O:0:8:0;:0:0;:08;:8:08 
FCB Os O:O:050:0:8;:0:0:8:8:8 
FCB @,$FF:@;:@ 
FDB SYSBUF 
FCB a 
FDB a {SET WHEN USED) 
FCB O:8:05;8:0;:0:8:8 
* INIT COPY OF USER PGM DCB 
FCC F BIN/ 
FCB Os %3@;0;0:;0;:08:8;@ 
FCB O:0:0:0:05:0:0:0;5:8:8;:8;:@8 
FCB @:$FF;8@;:@ 
FDB SYSBUF 
FCB @ 
FDB aA 
FCB 2:05;0:0:0:8;:8;:8 
* 
ENDVEC FCB 2 END OF PRESET DATA 


¥ 

HER EEE ERE EEE EE EEE EE EEE EEE ERE EERE EER LEER IEEE EEE EEE EEE IEEE EE EE EEE EE 
* INITIAL START UP — CHECK FOR AUTO EXECUTE 

* 

EERE EEE EEE EE EEE EEE EEE EEE EEE EEE EEE EEE EH EEE EEE EEE EEE EE 


Bi FDB B2-B1 SIZE OF OVERLAY 
* CHECK FOR AUTO PROGRAM EXECUTION 
LDD #$1 
LDY #1 
LDU #EB 
JSR DOMAP CLR SCREEN & IF AUTO EXISTS; DISPLAY IT 
LDX #USRDCB 
LDB #8 NAME LENGTH 
LDA aU GET 1ST CHR FROM SCREEN 
CMPA #E42 IS IT A BLANK? 
BEG MENU@ IF YESs NO AUTO FUNCTION 
STRTi LDA sU+ 
CMPA #E50 
BCS STRTZ 
EQRA #$40 
STRTZ STA sX+ 
DECB 
BNE STRT1 
DOS GOsEXEC GO LOAD & EXECUTE PROGRAM 
MENU@ DOS GOsMENU GO DISPLAY MENU & RE-INITIALIZE 


sg 
KREKEEERE EERE EERE REE RHEE EEE EEE EEE EKER EKER EEE HEE REE ERE EE 


* MAIN MENU SELECTION 2 — EXECUTE A PROGRAM 
EERE EERE EE EE EERE EEE EEE EEK E EEE HEHEHE EEE EEE KEE HEE EE EEE REE EEE 


Bo FDB B3-B2 SIZE OF OVERLAY 

LDD #512 STARTING LINE NUMBER 

LDY #549 ENDING NUMBER 

LDU #@ 

JSR DOMAP DISPLAY SCREEN FORMAT & GET ADDR OF INPUT FIELD 
* NOTE U -—> FIRST INPUT FIELD ON SCREEN 

LDX #USRDCB POINT AT DCB 

PSHS Xs ADDR OF VID AREA & DEST AREA 


— 


PAGE 


20370 
go38a 
20390 
aa4a0 
O2410 
g0420 
20430 
20440 
02458 
20460 
g0472 
an4e0 
a049a 
aa5aa 
aa5i0 
aa520 
20530 
00542 
ga55a 
2056a 
ga572 
ga5ea 
20592 
gaeaa 
@a612 
620 
@0630 
20640 
aa65a 
226460 
Qa47a 
gaa 
aaa 
ga7an 
aa7ia 
ga720 
Qa730 
2274 
ga75a 
22760 
@a77a 
ga78a 
@a790 
gasaa 
aasia 
ga8za 
g083a 
20840 
aassa 

008460 
2as7a 
gassa 
a0850 
garaa 
ao710 
ga920 
20930 
20740 


433 


@i8sz2A 
@iBS3A 
Biss4a 
@1855 

@1i856 

@1857 

1858 

@1i8S7A 
B1iséBAa 
@igséia 
Bigé2a 
BiBdS3A 
B1i8644 
@i84654 
18664 
@isd7A 
@isésAa 
BiBs7A 
@1i8784 
Bis7ia 
@igs72a 
B@1i873A 
1874 

@1i875 

@1is76 

1877 

B@is7BA 
Q@1iB79A 
Bigeaaa 
@igssia 
Bissza 
BiBB3A 
Bisssa 
Bi88sAa 
Bisséa 
01837 

Gi 8esa 
Biseva 
Gisvaa 
Bisvia 
BisggZAa 
Bis7saa 
B1894A 
Biggsa 
@is9é6a 
BiBy97A 
Bis9BA 
Ziavsa 
BiP7aaa 
Bivaia 
Bigaza 
Bivgasa 
Aisa4a 
@i9asAa 
Bieasa 
Biva7A 
BiPasA 
Bl9A9A 


OLY 


5@ 


is 
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DOS - PAGING & OVERLAYS 


* 


DOS 
PULS 
DOS 


DOsFIELDI INPUT A&A FIELD 


XU 
GOs EXEC 


GO EXECUTE IT 


He KEE EEE EE HEHEHE REE EEK EERERKEE EEE EERE EREERERE 


* MAIN MENU SELECTION 3 ~— TURN ON CLOCK DISPLAY 
IEE EEE EE EEE EEE EEE EEE EE EEE EE EEE EEE EE EEE EE 


BS 


>rPrrPrPrprprpyp 


> 


rPbehdD 


* 


FDB 
LDD 
SUBD 
STD 
LDY 
PSHS 
STD 
LDU 
CLRB 
LDY 
DOS 
LEAS 
PULS 
SLY 
DOS 


B4—-B3 
MAXMEM 


#BR14—-Bi3+5 ALLOW ROOM FOR CLOCK ROUTINE 


MAXMEM 
OLYLOC 
Y 

OLYLOC 


#$4004+32-8 DISPLAY AT TOP RIGHT CORNER 


#7 


SIZE OF OVERLAY 


DOsREALTM TURN ON DISPLAY 


4455 

Y¥ 
OLYLOC 
GO. MENU 


NORMALIZE STACK 


HH HIE HEE EEE EEE EKER KEE EERE KERR EKER ERE EKER EERE ERER 


* MAIN MENU SELECTION 4 — DISPLAY FREE SPACE MAP 
HEE EEE EERE KEE EERE EEK EEE EEE EEE EEE REE RE RE RERE 


B4 


iii D> > rPpRrPY 


* LOOP 


FRE1 


mH 
b> 
“4 
v3) 
m 
Gl 


FDB B5-B4 
LDD #72 

LDY #99 

LDU #2 

JSR DOMAP 
CLRA 

PSHS 5 

LDU #$400 
BSR FRES1 
ONCE PER DRIVE 
CMPU #$5FF 
BCC FREX 
PSHS VU 

L.DX >$COGS 
LDA #2 

LDP. 235 

STD a Xt+ 
LDD #$1102 
STD aX++ 
LDD #SYSBUF 
STD s K++ 
LDA #2 

STA >RETRYS 
JSR DOTO 
LDA #5 

STA >RETRYS 
PULS VY 

Ly #SYSBUF 
LDB #53 

LDA 5X 

BEG FRES 
LDA #$58 


Size 
START OF SCREEN FORMAT 
END OF FORMAT 


DISPLAY FORMAT 


(DRIVE COUNTER) 
VID BUFFER 
FIND STARTING DISPLAY POSN 


MORE DISPLAY ROOM? 

IF NO 

SAVE NEXT DISPLAY ADDRESS 
POINT AT PARAMETERS 


{READ ) 
(DRIVE) 
(TRK 17s SEC 2) 
(ONLY 2 RETRYS) 


(RESTORE. TO -3) 


{DISPLAY LOC) 


LOOP COUNT 
RESULT 

IF OW 

(X) 


PAGE 


Q2295@ 
QAa74a 
22978 
BAR 
BQ998 
2180a 
@1018 
G1828 
81838 
21842 
@1@5a 
21840 
21872 
21a8a 
1898 
2118@ 
1118 
G112@ 
1138 
21142 
@115@ 
2116a 
@117@ 
21188 
@119@ 
21202 
i210 
Bizz 

@1232 
1248 
@1258 
21268 
G127@ 
21288 
1290 
21380 
#1318 
G132 

81338 
21342 
@1i352 
01362 
21372 
21380 
B1390 
140 
01418 
81422 
1438 
21448 
1458 
01468 
21478 
21482 
21498 
2150 
@151a 
21522 


@34 OLY 


Bi?vi@A 
BisSiia 
Bigiza 
@i9isa 
Bigzgi4a 
@ivisa 
Bizviésa 
Bivi7AéA 
Bivisa 
Bi9iVA 
Bigz@a 
@igzi 

BigZzzAa 
Bi9Z34 
BigvzZ4A 
Zig9gzZ5A 
BigZ6A 
Bi92Z7A 
@ivzsa 
B1IVZ9A 
Qi93aA 
Bigsia 
Big3zA 
B1iI33A 
19344 
Bi935A 
1936 

21937 

@i9384 
B1i939A 
Biv4BA 
Big4iAé 
B1l942A 
B1i943A 
Biv44a 
Bi945A 
@1946 

1947 

1948 

21949 

Bi9s@a 
@i9siAé 
Bi9gsz24 
Zi9S53A 
B19544 


Bi9S5A - 


Zigséa 
Bigs7Aé 
Bi 9584 
Bi9S9A 
BiPVSBA 
Bigvésia 
Ai9624 
21963 

Bi964 

@ivé5A 
194664 
Z21i967A 


129F 
iZAli 
iZAz 
1244 
1ZA& 
1248 


124A 2 


ZAC 
L2AF 
12B1 
12B7 


12B8 


12BA 2B 


1Z2BC 


12BE 2 


12C@ 


12C2 2 


1204 
12C6 
12C8 
12CA 
12CC 
12CE 
ber 
12D1 


12D3 
12D5 
12D7 


12D9 2 


12DB 


12DF 2 


12E1 
12ZE3 


DOS —- PAGING & OVERLAYS 


BSR FRESET 


DECB 
BNE FRES 
FRE4 INC 35 DRIVE COUNT 
LDA 3S 
CMPA #4 MORE DRIVES TO GO? 
BCS FRE 1 t= - YES 
FREX JSR DERR WAIT FOR A KEYSTROKE 
PULS A 
DOS GOs MENU 
RTS 


* DISPLAY FOR THIS DRIVE 
rREeS LDA 2¥+ 
BMI FRES IF PART OR ALL AVAILABLE 
LDA #$58 {X) 
BRA FRE8 
FRES CMPA #EFF 
BNE FRE? 
LDA #ESE 
BRA FRES 
FRE7 ANDA HEF 


ALL AVAILABLE? 
IF PART USED 
{PERTOD) 


ORA #372 
FRES BSR PRESE f 
DECB 


BNE FRES 
BRA FRE4 GO BACK FOR NEXT DRIVE 
* STORE CHR ON SCREEN & FIND NEXT DISPLAY POSN 
FRESET STA ~1sU 
FRESi LDA sU+ 
CMPA #SSE 
BE® FRESX 
CMPU #4600 


PERIOD? 


END OF SCREEN? 


BNE FRES1 IF NO 
LEAU ~Le 
FRESX RTS 


¥ 

HERE EEE EEE EEE EEE EERE EER EEE EKER EEE EE 
* MAIN MENU SELECTION 5 — COPY FILES 
KEK EEEE KEE EEE EEE EEE EEE EERE REK EEE EEE 


BS FDB B6é-BS SIZE OF OVERLAY 
PSHS X 
BRA BSA 

BSDCBi RMB DCBSZ 


BSDCB2 RMB DCBSZ 
BoA LDD #558 START OF FORMAT 
LDY #A99 END OF FORMAT 


LDU #2 CLEAR SCREEN FIRST 
JSR DOMAP DISPLAY SCREEN 
LDB #7 


DOS DO; INPTS 
CMPB #ERREAK 
BEO Box 
¥ 
* ENTER PUSHED SET UP DCBS 
BJ LDX #$4200 
LDU 15 BASE ADDR 
LEAU BSDCB1-B5;U POINT AT SOURCE DCB 


7 


ec 


PAGE 


1538 
81548 
1558 
1568 
81578 
@158@ 
@1590 
214680 
@1618 
G1620 
81638 
01648 
1658 
21648 
1678 
014682 
1692 
#17288 
G@171@ 
01720 
@1738 
01748 
@175@ 
21762 
81772 
01782 
21790 
B18aea 
@181a 
21820 
@183a 
01848 
@185@ 
01860 
21870 
0188@ 
21892 
2198a 
@1i910 
1920 
1938 
1940 
81958 
01948 
1972 
21988 
Gi99@ 
Q22008 

2812 
G2020 
2038 
B2048 
42058 
22068 
@2070 
2088 
B2890 
B2100 


@35 


@i 968A 
Big9és94é 
Big?7AA 
Bi971A 
Big72 

Bi973A 
Bi974Aé 
@i975A 
Big76A 
Bi977A 
@i978A 
Bi979A 
Big8@Aa 
BigB1A 
BigBzAa 
Bi9B3A 
G1i9844 
Bi985Aé 
@1i986A 
Bi9s7A 
Bi7884 
Bi9B9A 
Bis9BA 
Bi991AéA 
B19924 
Bi993A 
Bi994Aé 
Bi995A 
Bivvs6a 
B1i997A 
81998 

B1i999A 
B2BABA 
B2OQiA 
Q2002A 
B20B3A 
Bz2Z0Q44 
A2QG5A4 
B2AA5A 
B2Aa7A 
228884 
B20094 
GB201BA 
@2011A 
B2012 

G@2013A4 
B2014A 
@2015A 
2@16 

@2017 

G@2018 

@2019 

B2020A 
B2021A 
20224 
B2B23A 
B20244 
B2025A 


OLY 


136C 
136E 
1371 


1373 : 


1375 
1377 
1379 
1376 
137D 
137F 
1381 
1383 
i385 
1387 
1389 
138B. 
138E 
138F 
L594 
1393 
1395 
1396 
1398 
139A 
139C 
LSTE 
1348 
13A1 
13A3 


1344 
13A6 
13A8 
13AA 
13AC 
1 3AE 
13B8 
13B2 
13B4 
13B7 
i3BD 


13BE 2 


13C@ 


13C4 
13C6 
13cCc 


13CD 
13CF 
13D3 
i3D5 
13D7 
13D9 


a7 1375 
Ce 31 A 
Bz IW be 
ZF 1344 
i8 138F 
28 a 
C4 A 
19 1396 
12 138F 
43 & 
G3 A 
il 1396 
23 138F 
84 a 
7@ A 
C8 21 & 
B@ A 
3B A 
FA 138F 
8a A 
58 A 
2 STE 
4@ A 
AB A 
FS 1396 
Ev 138F 
84 A 
ae A 
@4 1 3B 
4E A 
14 13C4 
E4 & 
G5 A 
88 37 A 
a4 13C4 
9F 8616 A 
1@ A 
@QDE a 
B9 GAGA A 
18 a 
=D 1484 
2a A 
20 & 


DOS ~ PAGING & OVERLAYS 


+ SETUP 
BSK 


BSTAB 


BSMOV 


BSMOV1 


BSL 


BSM 


BOX 


BRA 
& DCB 
BSR 


BSK SET UP SOURCE DCB 
DCBSZ:U POINT AT DEST DCB 
BSK 


BSTAB 
DCBFEX:U 
#3 

BSMOV 
BSTAB 

aX 

#572 
DCBDRV:sU 


MOVE EXTENTION 


(ZERO) 


sX+ 
#$5B 
BSTAB 


aK+ 
#E50) 
BSMOV1I 
#$40 
5 ¥+ 


BSMOovV 


TO Y/N 
#E59 Y 

#$4E N 

15 BASE 
BSDCB1I-BS: X 
BSDCB2-B5:s xX 

DOs COPY 


BS xX 
CERRORI 


x 
GOs MENU 


KEEKEKERRKEKHKERKEKE REE KHER EREEEREEE 


* DISPLAY SELECTED DIRECTORY LIST 
EEKKEKE KEE KEK EER EKER EEE EKER EERE EER 


Bé 


B&ARG 


FDB 
LEAX 
PSHS 
BRA 
FCB 
FCC 


B7-BS 
BSARG-BSs X 

x 

BSA 

4:@ 

/ y 


ol 


PAGE 


22118 
O2120 
G2138 
82148 
22152 
2168 
@2178 
2188 
2198 
2208 
@2218 
A222 
2238 
OB2240 
O2258 
QB2268 
2278 
Q2288 
D229 
2388 
2318 
Q2328 
2338 
82340 
82358 
2368 
@2378 
22388 
2398 
Q248@ 
22418 
O2420 
02438 
Q2448 
@2458 
22462 
2478 
B2488 
@2498 
B2508 
22518 
82520 
O25 38 
O2548 
@255@ 
Q2568 
2578 
@258a 
@2598 
2608 
22618 
Q2628 
2638 
22648 
2658 
82668 
82678 
@2688 


236 OLY 


B2026A 
B2027A 
B2028A 
B2029A 
B2Q3A4 
G2031 
20324 
B2033A 
G2034 
@2035A 
B2A36A 
Q2037A 
B2038A 
B2039A 
Q20404 
Q@2041A 
B20424 
G@2043A 
220444 
B2045A 
G@20456A 
@20474 
G@2048A 
A2049A 
22058 
B2051A 
B205 24 
B2053A 
AB2A54A 
@2055A 
@205 6A 
@2057A4 
@2058A 
ZOS59A 
B2B6BA 
@2061A 
B2062A 
B20634 
20544 
@2065A 
@2866A 
B2ZQ67A 
B2068A 
@2069A 
B287BA 
22071 
B2072A 
G@2073A 
B2074A 
Q@2075A 
B27 6A 
B2077A 
@2078A 
B2079A 
22088 
@2081A 
B28B2A 
B2083A4 


13E4 
1484 
1487 
1408 
14@E 


1411 
1413 


1419 
1418 
141D 
1420 
1422 
1424 
1426 
1428 
142A 
142C 
142E 
1438 
1432 
1434 
1436 


1438 
143A 
143C 
143E 
1448 
1442 
1445 
1447 
144A 
144C 
1452 
1453 
1455 
1457 
145D 
145F 
1461 
1463 
1465 
1467 


1469 
146B 
146D 
146F 
1471 
1473 
1475 


1476 2 


1478 
147A 
147D 


Q 

28 8 
@258 A 
G289 A 
Q2AAA A 
1@3c A 
@3 a 
E4 a 
42 5 
4288 A 
74 1496 
28 A 
77 149D 
6E 1496 
a3 a 
71 149D 
68. 1496 
Ba A 
@3 A 
E4 & 
C4 4 
41 A 
82 A 
6E A 
is 1453 
éF a 
ii 1453 
B6Ae ry 
Fg 1438 
1@35 A 
46 A 
E4 ay 
38 
38 A 
41 & 
E 4 1447 
4D 4 
iF A 
a8 A 
84 a 
6E A 
a? 1478 
CQ 4 
42 A 
Ba A 
Fd 1469 
E4 A 
C8 15 4 
BQ A 


DOS - PAGING & OVERLAYS 


FCC f 
BéA LDD #OOG 

LDY #549 

LDU #@ 

JSR DOMAP 
* GET USER INPUTS 

LDB #3 

DOS DOs INPTS 
* SETUP ARGUMENTS 


LDU 35 
LEAU Za 
LDX #$400 
BSR BS&TAB 
LDB #8 


BSR B&MOV 
BSR B&TAB 
LDB #3 

BSR B&MOV 
BSR BéTAB 


LDA sX+ 
ANDA #3 
LDU 1S 
STA 3U 
CLR isV 

* PREPARE LISTING 

B&D LDA sX+ 
CMPA #E6E 
BE® BoE 
CMPA $6F 
BE® BéE 
CMPX #$600 
BCS B&D 

BéD1 JSR DERR 
PULS U 
DOS GOs MENU 
RTS 

BSE LDU 15 
PSHS XsU 
DOS DOs SCNDIR 
PULS XsU 
LDA isU 
BMI BéD1 
LEAU 135U 
LEAX ~1sX 
LDB #8 

* DISPLAY NAME 

BOF LDA a X 
CMPA #ESE 
BNE B&éG 
LDA sU+ 
ORA #40 
STA sX+ 
DECE 
BNE B&F 

* DISPLAY EXTENT 

B&G LDU 15 
LEAU 2lsU 
LDA sX+ 


DISPLAY INPUT SCREEN 


NUMBER OF FIELDS 
GET INPUTS 


POINT TO NAME 


WAIT FOR A KEYSTROKE 


ENTRY FOUND? 
IF NO 
POINT AT NAME FOUND 


MAX NAME LENGTH 


POINT AT EXT 


Uo 


PAGE 


25978 
82788 
2710 
O2728 
2738 
2746 

2/758 

2768 
@2778 
2788 

2798 
B2800 
G@2818 
QO2828 
2830 
22842 
G2858 
22868 
2878 

B80 
B2898 
B2908 
2918 
2920 
G2938 
82948 
GB2958 
2968 
2978 
O2988 

2998 
23008 
3018 
Q23028 
3038 
23048 
23054 
23062 
@3878 
23880 
GB3078 
318 
@3118 
3128 
G3138 
3148 
@3158 
023168 
3178 
@318@ 
231970 
B3208 
@3218 
23220 
Q3238 
3248 
B3258 
Q3268 


O37 OLy 


B28844 
@2085A 
B2AB6A 
B2087A 
G@2883A4 
B2039A 
B2A70A 
B2091A 
B2U92A 
@2073A 
B2B944 
@2095A 
B2896A 
B2Q97A 
A@2ZA9BA 
@2a99A 
A@21AGA 
@21@1iA 
@21824A 
@2183A 
@2104A 
@2105A 
@2106A 
21Q7A 
@2188 
2189 
@2110 
@2iii 
@2112 
AS21134 
@2114A 
@2115A 
@2116 
@2117A 
@2113A 
B2119A 
B2128 
@2iz1A 
O@2122A 
@21234 
2124 
@2125 


@21414 


147F 
1481 
1483 
1485 
1487 
1489 
148B 
148D 
148F 
14971 
1492 
1494 
1496 
1498 
149A 
149C 
149D 
149F 
i4Al 
14A3 
1445 
1447 
1448 
14AA 


14AB 
14AD 
14B3 


14B4 
14B4 
14BC 


14BD 


14BF 
14C5 


1406 


14C8 2 


14CA 
14CB 


14CD 


39 


39 


39 


CE 


DOS - PAGING & OVERLAYS 


CMPA #$6F / 
BNE BSD GQ GET NEXT ONE 
LDB #3 
BSH LDA 5 X 
CMPA #$SE - 
BNE BSD 
LDA gU+ 
ORA #$40 
STA 3 X+ 
DECE 
BNE B&H 
BRA BSD 
BSTAB LDA sX+ 


CMPA #$5B. 
BNE BSTAB 


B&MOV LDA sX+ 
CMPA #50 
BCS BéMoVv i 
SUBA #$42 


B&MOVi STA sU+ 
DECB 
BNE B&MOV 
RTS 


¥ 

EEE EEE EERE REE EEK EEE EERE EERE EERE 
* FILL FOR ROUTINES NOT YET WRITTEN 
HEHEHE EE KEE EEE EEE EEE EEE E EEE EERE 
* (OTHER MAIN MENU FUNCTIONS) 


B7 FDB BS-B7 SIZE OF OVERLAY 
DOS GOs MENU 
RTS 

¥ 

BS FDB B9O-BS SIZE OF OVERLAY 
DOS GOs MENU 
RTS 

¥ 

BY FDB Big-B9 SIZE OF OVERLAY 
DOS GOs MENU 
RTS 


¥ 
KEE EKER EEE EEK EE EEE EEE EE REE EEE EEE EE EEE EE EEE EEE KER EE EE EERE REE EEE EERERERE 
GET SCREEN LINES OUT OF BASIC FILE & DISPLAY 


GIVEN IN THE STACK{PUSHED BEFORE CALLING: 
{3S = RET ADDR TO UNDO) 
(255 = RET ADDR TO CALLER) 
4,55 STARTING LINE NUMBER DESIRED 
655 ENDING LINE NUMBER DESIRED 
&sS INITIAL DISPLAY LOC 
KEKE KEKE KEKE EERE RE EE REE EE EEE EEE ER EKER EEK KR ERE EEE EE KEE EERE KER EE EKER EREE 
Bid FDE Bii-Bi@ OVERLAY SIZE 
{ONLY THIS LINE & ONE ABOVE MUST CHG TO USE DIF OVRLAY NBR) 
BYPASS LOCALS 
FILE OPEN SW - @ WHEN OVERLAY 1ST LOADED: 1 FROM THEN ON 
LAST LINE NUMBER READ 


OR Ok OR oe Ok OF 


MAPBSE EQU Bi@ 
BRA MAP 1 

MAPOSW FCB @ 

MAPLN FDB @ 

¥ 


MAP 1 LDU 


#MSGDCB POINT AT DCB 


PAGE 


23278 
Q3288 
3298 
23388 
03318 
Q332 

03338 
23348 
3358 
23362 
03378 
3382 
03390 
03488 
23418 
23420 
23438 
23448 
23458 
03468 
03478 
83488 
03498 
358 
@3512 
3528 
03538 
23540 
@3558 
03562 
@357@ 
03582 
@3590 
23680 
3610 
23620 
03638 
23642 
23658 
23668 
23678 
3682 
3692 
23780 
23712 
03728 
23732 
23748 
23758 
3768 
03772 
23780 
3798 
23808 
23818 
23820 
23832 
23840 


@38 OLY 


B2142A 
B2143A 
@21444 
B2145A 
@2146 
@2147A 
@21484 
B21494 
@2150 
B2i51A 
O@2152A 
Q@2153A4 
@2154A 
@21554 
2156 
Q@2157 
@2158A 
BZ21594 
B@2160A 
@Z21614A 
BZ162A 
@2163 
@21464A 
@2165A 
22166 
QZ2167A 
@2168A 
BZ169A 
B217@8A 
@2171A 
@2172A 
QZ173A 
@2174 
@2175 
2176 
@2177A 
@2178A 
B21794 
BZ218GA 
@2181A 
@Z1824A 
21834 
Q@2184A 
@2185A 
21864 
21874 
221884 
@Z189A 
BZi9BA 
ZI9ZIA 
B21I9ZA 
B2193A 
B2Z194A 
BZ195A 
BZ1i96A 
@2197 
@2198A 
BZ1994 


14D 
14D4 
14D8 
14DA 


i4DC 
14E2 
14E4 


14E6 
14E8 
14EA 
14ED 
14EF 


14F2 
14F5 
14F8 
14FA 
14FD 


14FF 
15Q1 


1583 
15@6 
1588 
15@8 
15@F 
isa 
1513 


»SA5 


1@BE 
1 @AF 
6D 
ze 


86 
A? 


ED 
ED 
Bé 
A7 


@ DOS ~- PAGING & OVERLAYS 
B625 A LDY POLYLOC (POINTS BEYOND THIS OVERLAY (WHERE NEXT OVRLAY WOULD GO) 
CS 27 A STY DCBLRB;:U USE AS LOGICAL RECORD BUFFER 
24 A TST MAPOSW-MAPBSEsX FILE OPENED? 
16 14F2 BNE. MAPS iF YES 
* IF FIRST TIME CALLED: OPEN DISK FILE 
DOS OPENs INPUT OPEN DISK FILE 
@1 A LDA #1 
a4 & STA MAPOSW-MA4PBSEsX SAY FILE IS OPEN 
* RESET TO BEGINNING OF FILE 
MAP2 CLRD 
@5 A STD MAPLN-MAPBSEsX RESET LAST LINE READ 
C8 2B A STD DCBRBA: U 
a3 & LDA #3 {START READING AT RBA O@ @@ @3) 
C8 2D A STA DCBRBAtZ:U 
* CHECK TO SEE IF FILE NEEDS 10 BE RESET 
* (REQUEST MUST BE > LAST LINE READ) 
FRFF A MAPS LDD #HEFFFF 
CS 29 A STD DCBPRN;U TO FORCE RE-READ INTO BUFFER 
25 Ay LDD MAPLN-MAPBSEs:X LAST LINE READ 
64 A CMPD 435 IST LINE TO BE DISPLAYED 
es 14E6 BCC MAP2 GO START OVER AT BOF 
* CHECK DISPLAY LOC OPTION 
58 A LDD 8:5 STARTING DISPLAY LOC 
iz yee Be BNE MAPS IF ADDRESS GIVEN 
* CLEAR THE SCREEN 
408 A LDU #E402 
68 & STU 835 START DISPLAY AT TOP OF SCREEN 
6862 A LDD #$5060 BLANKS 
2182 & LDY #256 
Ci A MAPS STD sU++ 
OF A LEAY ~1Le% 
FA 15@F BNE MAP4 
% 
* READ/DISPLAY LOOP 
* READ A LINE 
Q656 A MAPS LDU #MSGDCB POINT AT DCB 
GQA4 A LDD #4 LENGTH OF LINE NBR & MEM ADDR 
C8 11 A STD DCBRSZ;U SET TO READ 4 BYTE RECORD 
DOS READ: RBA 
65 iS58e BNE MAPERR IF 1/0 ERROR 
B62 A LDY POLYLOC {LOGICAL REC BUFFER) 
A4 A LDD ed GET "MEMORY ADDRESS" 
45 1573 BE® MAP1@ IF AT EOF 
22 A LDD 2sy GET LINE NUMBER 
@5 A STD MAPLN-MAPBSE:X SAVE FOR FUTURE REFERENCE 
@4 A PSHS D 
C8 iz A CLR DCBRSZ+1i:U SET FOR VARIABLE LENGTH RECORDS 
DOS READ: RBA READ A STRING 
ata) A PULS D 
4h i58B BNE MAPERR IF 170 ERROR 
64 ray CMPD 4355 IS AT LEAST AS FAR AS STARTING LINE NUMBER? 
CF Ee pe BCS MAPS NOT FAR ENOUGH: GO READ ANOTHER 
66 ay CMPD 635 IS IT BEYOND LAST ONE? 
"a 154D BE® MAPS IF THIS IS THE LAST ONE 
26 1573 BCC MAP1@ IF AT END OF RANGE 
* LINE FOUND - XFER IT TO SCREEN 
38 A MAPS PSHS Xs ¥ 
B625 A LDX 2OLYLOC 


a 


PAGE 


a3e5a 
23842 
@3872 
a388a 
Q3890 
23900 
@3912 
3920 
@393a 
3948 
3950 
23962 
3970 
a398a 
@3990 
a4aaa 
a4a10 
a4az0 
a4a30 
24040 
a4a5a 
24062 
a4070 
a4asa 
a4aoa 
24100 
Q4110 
Q4120 
04130 
24140 
@4150 
24142 
24172 
241280 
04192 
24200 
@421@ 
Q4220 
Q4238 
04240 
04259 
4260 
Q4270 
04280 
04292 
04300 
@4310 
04320 
@433@ 
24342 
@435@ 
04362 
04372 
24380 
04390 
244200 
04410 
24420 


a39 


B228BA 
B2201A 
O2202 
B2203A 
B2204A 
G@2205A 
B2206A 
GB2207A 
O220BA 
A22Q9A 
B2218A 
22liAa 
2eled 
B22134 
B2214A 
@2215A 
B2216 
@2217A 
@2218A 
B2219A 
Aa2220A 
B@2221A 
B2222A 
O2223A 
B2224A 
Q2225A 
@z22Z26A 
B2227A 
B2228A 
Q2229A 
2238 
Q@2231 
B2232 
G2233 
B2234 
Q2235 
B2236 
QB2237 
2238 
B2239A 
B2240A 
O@22414A 
OB2242A 
G@2243A 
O2244 
O@2245A 
Ze 46A 
B2247A 
B@224B4 
Q22494 
B22504 
B2=251A 
B2252A 
B2253A 
Zook 
Q@2255A 
B2256A 
B2257A 


OLY 


.SAIQ 
1552 320 a1 
i554 1QAE 4C 
i557 AS 82 
i559 Al CB 13 
i55C 27 A 
155E 81 48 
1560 24 r 
15462 BA 48 
1544 A7 Aa 
1546 20 EF 
1568 AE 6C 
1564 32 88 2 
156D AF 4C¢ 
1546F 35 30 
i571 2 Az 
1573 CE 2420 
1576 1Q8E a2z20 
157A 84 5B 
iS7C AL Ca 
iS7E 27 87 
i58@ 31 3F 
i582 26 Fa 
1584 CE 2420 
1587 EF 68 
1589 4F 

158A 39 

158B 8 19 
158D 39 

158E M142 
159@ EE 46 
1592 1Q0AE 64 
1595 1183 0400 
1599 27 18 
159B AG C4 
159D 81 5B 
159F 27 BA 
15A1 81 5D 
15A3 27 4 
15A5 AS AD 
i5A7 AZ CO 
15A9 2 FQ 
i5SAB BD 1035 
ISAE 1F 89 
iSBQ EE 66 
15B2 1QAE 44 


I5B5 1183 0488 


oC RSM 


DOS —- PAGING & OVERLAYS 


* MOVE 
MAP? 


MAPS 


MAPS 


* FIND 


MAP1@ 


MAPI1 


MAPI2 


MAPERR 


* 


LEAX 1sX (SKIP THE "REM" CODE) 
LDY B+455 DESTINATION ADDRESS 
CHARACTER LOOP 

LDA sX+ GET A CHARACTER 

CMPA DCBTRM:U IS IT THE TERMINATOR BYTE? 
BE® MAPS IF YES 

CMPA #E40 IS IT SPL CHR? 

BCC MAPS IF NO 

ORA #448 

STA s¥+ 

BRA MAP7 

LDX B8+435 

LEAX 323 X 

STX 8+43S 

PULS Xs¥ 

BRA MAPS GO GET NEXT LINE 
START OF INPUT FIELD 

LDU #$400 

LDY #512 MAX CHRS TO TEST 

LDA #$5B (LEFT BRACKET ON SCREEN) 
CMPA 5 U+ 

BEG MAPiz2 

LEAY —1syY 

BNE MAP11 

LDU #$400 IF NO FIELD FOUND 
STU 835 

CLRA 

RTS 

LDA #ERRZ5 

RTS 


HH EK HEE EEEEEEEEEEEEEEEEEEEEEEEE EER EEE EER EEE EERE EEE EEE EER 
* INPUT A FIELD FROM THE KEYBOARD (ECHO ON THE SCREEN) 


* 


= RET TO UNDO) 


TO CALLER 
OF INPUT FIELD IN WS 
OF INPUT FIELD ON SCREEN 


HEE EEE EERE EEE EEE EEE EE EERE EERE EEK EEE EKER EE EERE EEE EEE EEE 
Biz-Bi@ SIZE OF OVERLAY 


NO FIELD DEFINED? 
IF NO FIELD MARKERS 


ORIG CONTENTS TO SCREEN 


* GIVEN: (35 

* (255 = RET 

* 4,55 = ADDR 

* 6:55 = ADDR 

Bil FDEB. 
LDU 6:5 
DY 45S 
CMPU #$400 
BE FLDI2 

*% MOVE 

FLDIi LDA VU 
CMPA #$5B 
BE FLDI2 
CMPA #4$5D 
BEG FLDIZ 
LDA 3¥+ 
STA 5 + 
BRA FLDIi 

FLDIZ2 JSR DERR 
TER AsB 
LDU 35 
LDY 435 
CMPU #$400 


LOOK AT DESTINATION POSITION 
LEFT BRACKET? 

LE YES 

RIGHT BRACKET? 

LP. YES 


WAIT FOR A KEYSTROKE 


NO FIELD MARKERS? 


See 


PAGE @4@ OLY »5A28 DOS -— PAGING & OVERLAYS 
04438 @22584 1589 27 ay 16@5 BEG FLDIXX IF NO FIELD MARKERSs EXIT WITH KEY IN A & B 
04440 @2259A4 15BB Si 22 A CMPA #S2U WAS IT LOW CONTROL KEY? 

04450 @226@A4 15BD 25 2A i5E9 BCS FLDIX ir YES 

04448 @2261A 15BF G1 SB A CMPA #$5B. SPL CHR/NUMBERS/UPPER CASE? 

04478 @2262A 15C1 25 a4 eg Pag BCS FLDI4 IF YES 

024480 O822634 15C3 el 68 ca CMPA #£40 HIGH CONTROL CODES? 

04498 @22644 15C5 2 Le 15E9 BCS FLDIX IF YES 

424500 @2265 * FALL THRU WITH LOWER CASE 

@451@ @2266A 1507 AS C4 A FLDI4 LDA sU 

04520 @22467A4 15C9 Bl 5B & CMPA #$5B IS CURSOR OVER START OF FIELD? 
04538 @2268A 15CB 27 i< L5e9 BES FLDIX IF YES 

04540 @22694 i5CD 8i 5D & CMPA #$5D OVER END OF FIELD? 

@455@ @227@4 i5CF 27 18 15E9 BE® FLDIX if VES 

@456@ @22714 15Di iF 98 A TFR Bs A 

@457@ @2272A4 15D3 A7 A & STA s¥+ SAVE CHR IN INPUT AREA 

4458@ @2273A 15D5 81 4 A CMPA #$40 SPL CHR? 

24590 @22744 15D7 24 a2 15DB BCC FLDIS iF YES 

@4600@ O@2275A 1i5D9 BA 4@ A ORA #E40 

04618 @2276A 15DB A7 Ce A FLDI5 STA 3 U+ 

44628 @22774 15DD 1@AF 64 A FLDISA STY 455 

@4638 @2278A i5E@ EF 6 A" STU 435 

04640 @2279A 1I5E2 SF CLRB 

046580 @2=28@A 1563 Ad C4 A LDA a) 

04460 @2281A 15E5 ai 5D A CMPA #$5D FIELD OVERFLOW? 

Q@4678 @2282A 1567 26 Cz 15A4B BNE FLDIZ 

44688 @2283 + 

24698 @2284 * EXIT WITH LAST KEY PUSHED IN B (ZERO IF FIELD OVERFLOW) 
@470@ @22854 1569 Si @e A& FLDIX CMPA #LEFT {LEFT ARROW?) 

O471@ @2286A 15EB 264 18 16@5 BNE FLDIXX 

@4720 @22874 15ED a6 2 fay LDA #20 

04738 @22884 i5EF A7 A4 A STA +¥ 

04748 @22894 15F1 A7 C4 & STA aU 

24750 @2290A 15F3 Aé af & LDA ~1sU 

04768 @2291A4 15F5 81 5B A CMPA #$5B IN FIRST POSN NOW? 

04770 @2292A 15F7 27 4 15FD BE FLDIX1 iF YES 

04780 @2293A 15F9 31 BF & LEAY —is¥ 

Q479@8 @22944 15FBR 33 ar A LEAU ~1sU 

@4800 @2295A 15FD 86 28 & FLDIX1 LDA #$20 

@4810 @2295A 1SFF A7 AG a STA s¥ 

G4828 @22974 1681 A? C4 4 STA sU " , 
@4838 O@22984 14683 20 DS 15DD BRA FLDI5A a, 
024848 @2299A 14685 39 FLDIXX RTS 

@4858 22308 * 

Q486R @2RBeai EEE EEE EEE EEE EEE ERE EEE EE EERE EERE REE E 

24878 @2302 * ACTUALLY LOAD AND EXECUTE PROGRAM 

@4888 @2383 * GIVEN: DCB FOR THE PROGRAM FILE STORED 

24898 @2384 * IN USRDCB 

84900 @2305 ETE EE IEEE EEE EEE EEE EEE EEE EEE EERE EEE ER EEEE 

424918 @2386A 14686 Aa? 7 A Biz FDB Bi3-Biz SIZE OF OVERLAY 

24920 @2307A 14688 34 i@ fa PSHS x SAVE MY BASE (LOWEST LOAD ADDRESS ALLOWED) 
G4938 @2388 * STEP 1 OPEN THE PROGRAM FILE -— DOES IT EXIST? 

24948 @23@9A 148A CE AS97 4 LDU #USRDCB 

04958 @231@4 146@D 84 FF fa LDA #BFF 

04960 @2311A 146@F A7 ce 21 a STA DCBDRV;U SEARCH ALL DRIVES 

@4978@ @2312A 1612 DOS OPENs INPUT 

24980 @2313A 1618 27 1a 162A BEY EX1 IF OK 

24998 @2314A 161A Bi @D 5 CMPA #ERR1I3 NOT PREV CLOSED IS OK 

@5iAQGQ B@2ZSBi5A 161C 27 ac 1424 BE® EX1 
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Q@501@ 
25028 
25832 
Q5042 
Q25858 
A586 
@5872 
5082 
A589 
Q512a 
@511@ 
@5120 
43138 
@5148 
@3515@ 
@5168 
25178 
@5180 
O5198 
45208 
Q@5218 
Q5228 
Q@523a 
Q3242 
O5258 
Q@5268 
@5278 
Q5288 
@5298 
B53 388 
@531@ 
QS 328 
Q5338 
85340 
Q5358 
25368 
@537@8 
@5388 
Q5398 
QAG12 
BQA28 
QAR3IA 
A20042 
QGASA 
BABSA 
QG0728 
Mahal faba 
BVIATIA 
Qi aa 
Q@Biiea 
QG1i28 
QG1 32 
G14 
A2Bi5ea 
Q@16@ 
@@178 
QaG18a 
AG198 


O41 


B2316A 
B2317A 
@23184 
Q@2319 
B2320 
B2321A 
B2322A 
B2323A 
AS23244 
B2325A 
B23264 
B2327A 
B2328A 
B2329A 
BzZ3SAA4 
B2331A 
B23524 
B2333A4 
O@2334A 
23354 
B23364 
B2337 
AS33584 
B2339A 
B23484 
23414 
B23424 
B2343A 
B23444 
235454 
B23446A 
B2347A 
23484 
B2349A 
A@23584 
B2351A 
B23524 
B235 34 
B2354 
G@2355 
2356 
82357 
GB2358 
O2359 
B2362 
GB2361 
B2362 
B2363 
B2364 
B2365 
B2366 
2367 
2368 
B2369 
2378 
@2371 
Q2372 
273A 


OLY 


161E 
1622 
1624 


162A 
162D 
1630 
1633 
1636 
163C 
163E 
1648 
1642 
14644 
1644 
1648 
1644 


144D : 


164F 
1651 


1653 
1656 
14659 
165¢ 
165F 
1661 
1464 
1667 
1664 
166D 
1&6F 
1671 
1673 
1475 
1678 
147A 


167D 


»SAE 


35 


a 


9F @é 
i@ 


BAB 1 


DOS —- PAGING & OVERLAYS 


16 A EXERR JSR CERROR J 
A PULS X 
DOS GOs MENU 
¥ 
* READ FILE PREFIX DATA (LOAD ADDR: RBA OF IST OVERLAY: ETC) 
A EX] L.DX FOLYLOC POINT BEYOND ME 
A six DCBLRBsU USE AS LOGICAL REC BUFFER 
A L.DD #18 READ 1ST 1@ BYTES OF PROGRAM FILE 
A STD DCBRSZ:U 
DOS READ: RBA 
16iE BNE EXERR 
A Pat 1X iS iS) BYTE ZERO? 
1644 REO EX2 iF. YESs. OK 
A LDA #ERR27 WRONG TYPE FILE 
I61ieE BRA EXERR 
A EX2 LDD 3X {LOAD ADDRESS) 
1456 BE EX3A IF BASED AT ZERO: ASSUME RELOCATABLE 
A CMPD +5 HE MUST LOAD ABOVE THIS POINT 
1653 BCC EXS if HE IS OK 
A LDA #ERRZS LOAD ADDR IS Too LOW 
161E BRA EXERR 
* LOAD ADDRESS I5 HIGH ENOUGH 
A EX3 STD DCBLRBsU SET THIS AS LOGICAL RECORD BUFFER 
A EX3A LDD DCBLRBsU 
INCD 
& STD *USRBSE 
A LDD 8s X {SHOULD BE RBA OF 1ST OVERLAY) 
& STD DCBRSZ:sU THAT IS ALSO HOW BIG ROOT SECTION I5 
A ADDD DCBLREsU RESULT IS WHERE END OF ROOT WILL BE IN MEMORY 
A ADDD #3 
4 STD POLYLOC SET THIS AS BASE OF FUTURE OVERLAYS 
& Tee Ds ¥ 
& LDA HOFF INVALIDATE WHICH OVERLAY IS IN OVERLAY AREA 
a STA =a ¥ 
A LDA #5 
A STA DCBRBAtZ;U START READING WITH 6TH BYTE 
& PULS X 
A JMP BizA GO LOAD ROOT & XFER CONTROL TO IT 
* 
HEE EEE EE EEE EEE EK EEE EE EEE EEE EEE EEE EEE EEE EE EEE EE EEE HEHEHE EEE 
* RELOCATABLE REAL-TIME CLOCK ROUTINE 
¥ 
* DESIGNED TO BE LOADED BY MAINLINE OF USER’S PROGRAM: SAVING ITS 
* LOAD ADDRESS. THEN ACCESSED THRU THE SAVED VECTOR TO PERFORM 
*% FUNCTIONS. 
* 
* GIVEN! B=@ - INITIAL CALLs LINK SELF INTO TIME INTERRUPT AND PROTECT 
* MYSELF FROM BEING OVERLAYED 
* B=FF — UNLINK AND RELEASE OVERLAY SPACE 
* Bei GET Fie 
* B=2. ~ BEEP) T.2ME 
* WITH GET & SET TIME: Y CONTAINS SECONDS AND 6@THS OF SECONDS 
* U CONTAINS HOURS AND MINUTES 
* WITH INITIAL CALL: U -> DISPLAY ADDRESS (@=NO DISPLAY DESIRED) 
* Y = 1 FOR HOURS: 2 FOR MINUTES: 4 FOR SECONDS 
* OR ANY COMBINATION (ADDED TOGETHER) 
EEE EEE EEE EEE EEE EEE EEE EEE EE EEE EEE EEE EEE EEE EERE EERE EEE EE EEE EEE EEE HERE E 
A B1S FDB Bi4-Bi3 OVERLAY SIZE 


PAGE 


AAZAA 
ABz1a 
A228 
AG238 
AA248 
AG252 
AGaZSA 
84278 
AG28a 
2B29R 
ZAZA 
20318 
2Q328 
20338 
AG348 
20358 
AA36A 
2A372 
22382 
A2A39@ 
29408 
20412 
20420 
00438 
20448 
20458 
20462 
20478 
28482 
29492 
22588 
2a51@ 
AA523 
2a538 
22542 
22558 
225462 
0@57@ 
2258a 
2a59@ 
2A600 
08618 
23628 
20638 
22642 
23658 
2G66R 
23678 
22682 
AS69R 
2722 
02712 
28728 
28738 
22742 
28758 
22762 
22778 


O42 OLY? 


2374 
Q2375A 
@2376A 
@2377A 
@23784 
B23794 
A2380A 
B2381A 
B2382A 
B23834 
B2384A 
B2385A 
23864 
B2387A 
@238B8A 
B2389A 
B2398A 
Q@2391A 
QB2392A 
B2Z393A 
B23944 
23954 
23964 
Q2397 
B239BA 
B2399A 
B24884 
B2Z4BiA 
BZ4024 
B2Z4A3A 
Q2404A 
O24254 
B24064 
B24B7A 
BZ4QGA 
B2489 
B2418A 
24114 
B24124 
24134 
B24144 
@24154 
B2416 
B24174 
B241B8A 
B2Z419A 
BZ420A 
B24214 
B2422A 
B2423A 
B2424A 
B2Z425A 
Q@24264 
O24274A 
Q@24284 
B24294 
B243A4 
B24314 


167F 2 


1681 
1682 
1683 
1684 
1685 
14687 
14688 


1689 : 


1688 
168D 
168E 
1692 
1691 
1693 
14695 
1698 
1699 
169A 
169C 
149F 
1648 


16A1 
1643 
1645 
16A7 
16A4B 
16AD 
16B3 
16B5 
16B7 
16B8 
16BA 


16BR 
1é6BF 
i6C5S 
16C7 
16C9 
16CA 


16CB 
16CE 
i6D1i 
16D3 
16D4 
16Dé 
16D8 
14DA 
16DB 
16DD 
16DE 
16E@ 
1s6E2 
16E4 
16E5 


bYD 


28 A 
2@ A 
BA A 
89 @G4E A 
44 A 
62 4 
Faken) A 
a A 
89 @@4E A 
QS A 
z 4 
AAA A 
AAA A 
Fate) & 
ifn) A 
38 A 
ae 16CB 
Zi A 
Bb a 
58 A 
1A 16FE 
Bb a 


DOS ~ PAGING & OVERLAYS 


CLK 


HRS 
MIN 
SEC 
CNT 
TMELOC 
TMEOPT 
CLK I 


CLKSET 


CLKAGET 


* 
CLKAGO 


* 


CLKSTP 


* 
CLATME 


Bis {TO ALLOW CHANGING TO DIFFERENT OVERLAY DURING DEVELOPMENT) 
CLK I JUMP OVER LOCALS 
a HOURS (COUNTS To 255) 
a MINUTES (ALL VALUES SET To ZERO WHEN LOADED) 
@ SECONDS 
a 
a TIME DISPLAY LOC 
a HRsMINsSEC OPTION 
WHICH OPTION? 
CLKGO 
—w aX 
CLKSTP 
CLKGET 
HRS-CLK3 X 
SEC-CLK4 X 
HRS-CLKs X 
SEC-CLKs X 


TMELOC-CLK:X SAVE DISPLAY ADDRESS 

¥sD 

TMEOPT-CLKsX SAVE DISPLAY OPTION 
CLATME-CLKsX POINT AT INTERVAL ROUTINE 


43U SET LDX COMMAND TO LOAD CURRENT X VALUE 

TIME:ON PLUG IN THE CLOCK 

23S RET ADDR TO CALLER 

D PUT IN TOP OF STACK TO BYPASS NORMAL EXIT OF OVERLAY 
zaX TELL USER WHERE TO ENTER ME 


RETURN TO CALLER 


CLATME-CLKsX POINT AT INTERVAL ROUTINE 
TIME: OFF PULL THE PLUG 


D RET ADDR TO CALLER 

258 SET TO RET TO HIM AFTER EXITING FROM OVERLAY 
>Q 

#0 THIS INSTR MODIFIED BY ABOVE ROUTINE 
SEC-CLK:X LOAD SEC & 6Q@THS 

SEC-CLKs X 

#56 FULL SECOND? 

CLKTME IF NOs EXIT 

#1 

SEC—CLKs X 

#460 FULL MINUTE? 

CLKDSP IF NO 

SEC-—CLKs X 


ee 


© 


CCE TSM 


cy 


PAGE 


22780 
28792 
ABBA 
Q22812 
AAB20 
Q2Q832 
22848 
QAa85a 
AABS6B 
Q28872 
Aa88a 
8898 
AaIA8 
289712 
Aa9z2 
BA932 
A942 
Q2a95a 
A2Aa96@ 
229728 
A278 
B2a998 
21202 
81812 
G1i8208 
@1038 
1048 
81852 
@1268 
21872 
Biase 
21898 
@110 
@111@ 
1122 
01138 
@114@ 
21158 
@1168 
21178 
1188 
@11i92 
G1 200 
@1i210 
Bizz 

Biz30 
1240 
G1258 
01268 
1278 
21280 
@1z290 
01380 
@1i31a 
21320 
41338 
21348 
@135a 


G43 


OzZ432A 
O2Z433A 
O2434A 
O2435A 
AZ436A 
Q2437A 
ZA RBA 
DZ43B9A 
A244BA 
O2441A 
24424 
O2443A 
D2444A 
O2445 
O2446A 
D2447A 
Q244BA 
DE449A 
24504 
O2451A 
24524 
OZ453A 
O2454A 
Q2455A 
O2456A 
24578 
2458A 
Q2459A 
M2444 
OZ4614 
2462 
A2463A 
D2464A 
B2445A 
QZ446A 
QZ447A 
O2448A 
24SIA 
O247QA 
OZ471A 
24724 
Q2473A 
O2Z474A 
2475 
O2476 
2477 
O2478 
2A7 IA 
2480 
O2481A 
O2482A 
O2Z483A 
O2484A 
O2485A 
DZ486A 
O2487A 
O248BA 
Q2489A 


OLYZ 


15E7 
16E9 
16EB 
16ED 
16EE 
16FQ 
16r2 


16F4 2 


LaF 6 
16F7 
1éF9 
LéFA 
14FC 


146FE 
i702 
1702 
1704 
1785 
1707 
1709 
i708 
178C 
170E 
1712 
i712 


£723 . 


: at es 
1717 


L727 3 


171B 
171D 
L715 
L7ir 
1728 
war's | 
1723 
i725 
Afad 
1729 
1728 
i72D 


172ZE 


173@ 
1733 
1737 
173A 
173D 
1741 
1743 
1745 
1747 


>rPrRPrDD?D 


DOS - PAGING & OVERLAYS 


LDD HRS-CLKs X 

ADDR #1 

EXG AB 

DAA 

EXG ArB 

STB MIN-CLKs X 

CMPR #6642 FULL HOUR? 
BCS CLKDSP IF NO 
CLRB 

ADDA #1 

DAA 

STD HRS—CLKs X 

BRA CLE TME 


* DISPLAY RESULTS IF NECESSARY 


CLKADSP LDU TMELOC-CLKsX DISPLAY LOC 
BE® CLATME EXIT 
LDB TMEOPT-CLKsX DISPLAY OPTION 
LSREB 
BCC CLKZ IF NO 
LDA HRS-CLEKs X 
BSR CLKEDT 
CLK2 LSRB MINUTES DESTRED? 
BCC CLKG IF NO 
LDA MIN-CLEs X 
BSR CLKEDT 
CLK3 LSRB SECONDS DESIRED? 
BCC CLATME IF NO 
LDA SEC~CLKs5 X 
BSR CLKEDT 
BRA CLK TME 
* EDIT THE BCD NUMBER IN A — DISPLAY AT U 
CLKEDT PSHS A 
LSRA 
LSRA 
LSRA 
LSRA 
ADDA #30 
STA 9 U+ 
PULS & 
ANDA #SOF 
ADDA #430 
STA sU++ 
RTS 


*% 
KHER EKE EE ERERKERRERERERERER RHEE EK EKER HEHE HKHREEREE ERE RERHEEREREE 


* DOS MAIN MENU DISPLAY 
HEE ERE EEE EE EEE EEE EEE RHEE EKER E HER EERE EEE HERE EERE EEE EEE EEE REN 


B1i4 FDB BiS5-Bi4 SIZE OF OVERLAY 

* DISPLAY DOS MENU SCREEN 
LDD #128 STARTING LINE NUMBER 
LDY #199 END OF RANGE 
LDU #8 SAY CLEAR SCREEN FIRST 
JSR DOMAP DISPLAY MENU MAP 

MENUL SYSTEM POLCAT 
BE® MENU1 
SUBA #31 LESS THAN 17 
BEG MENUZ IF 1 ENTERED (RET TO BASIC) 
BCS MENU 1 iP YES 
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21368 
013708 
@1380 
@139@ 
G14aa 
014108 
Q1420 
81438 
01442 
@i45a 
214468 
21478 
81488 
41490 
2i5ae@ 
@i51@ 
@1520 
41538 
1548 
1558 
81568 
@15708 
@1588 
Gi59@ 
21682 
1618 
1622 
14638 
21648 
1658 
2146468 
814678 
21682 
1692 
21782 
@1718 
81720 
@i73a 
81748 
G@i75a 
01760 
@1778 
@1780 
G@i79a 
Biskaa 
@1i8ia 
@1828 
@1836 
21848 
@i1a85@a 
@186@ 
Bi3s7e@ 
G188a 
G1is7e 
2197288 
1918 
@1928 
@1938 


O44 


B249R8A 
B24914 
B24924A 
B24934 
B2494A 
O@2495 
2496 
B2497 
B2498 
A2499 
@2580 
A251 
QB2582 
M2583 
2584 
G@2585 
B2586 
2587 
Q@2588 
@2509 
B2512 
Oeait 
Fe 
@25 134 
Q@2514 
@25 135A 
B25 164 
B2517A 
B2518A 
@25197A 
B2520A 
@25214 
B2522 
GB2523 
B2524A 
OB2525A4 
@25 2564 
B25 274 
AS25284 
@2529 
B25 384 
B25314 
B25 324A 
B25 334 
@2534A 
B25 35A 
A25 364 
@2Z5374 
G25 384A 
B25 39A 
B25 484 
@25414 
B25424 
25434 
B25444 
B2545A 
@25464 
B2547A 


OLY2 


1749 
i74B 
174D 
174E. 
i752 


i733 


igo? ix 


7S? 
LW por |= 
175D 
iior 
ee 
1763 


1765 
1767 
176A 
174C 
176E 


176F 
i772 
1774 
17 tS 
iffs 
377D 
Lie 
1783 
17S? 
178B 
178F 
2793 
1798 
179A 
L79E 
17AL 
17A3 
i7AS 


9F B6@8c 
AFFS 


ABaA 
AAA 


32 
@aDS 
a3 
ig 


BAG1 

Mé 

B89 @aDé 
a4 

AB 

A 

@625 

8? @@AR 
89 @@55 
89 @AA7 


& 
A 


pPrPprppb 


Setsos 


DOS —- PAGING & OVERLAYS 


MENUS 
* 


#6 
MENU 1 


[GO] 
OBASTIC 


NUMBER OF MENU SELECTIONS THAT HAVE BEEN WRITTEN 
IF NOT IN RANGE 

TO GET OVERLAY NUMBER OF SERVICE ROUTINE 

PAGE IT IN & GO TO IT 


ERE LEKE KE EEE KKK EEE EEK EK EE HEE EE EER EE EEE EKER EE EE KEE EEE EE EEE EEE EEK 
* BUFFERED PRINT 1/70 OVERLAY 


* 


MR OR Ok Ok ok OR ok Ok OF OK OF 


TO ACTIVATE: 


TO USE: 


LDU #51ZE 


(TOTAL MEMORY TO USE FOR THIS PURPOSE) 


DOS DOs BUFPRT 


LDA CHARACTER TO PRINT 


AGAIN CLRB 


(SAYS 


JSR C€PRNT J 


BNE AGAIN IF BUFFER WAS FULL: 


TO TERMINATE: 


"T AM NOT SHUTTING DOWN") 


TRY AGAIN (OR GO DISPLAY MSG) 


LDB #1 (ANY NON-ZERO SAYS SHUT DOWN) 

* JSR CPRNT I 
KEKE EKER ERK EERE EEE EEE HEE EE EERE REE EEE EERE ERE KEKE ERE RE ERE EERE ER 
Bis FDB Bié-B15 SIZE OF OVERLAY 
BP EQU Bis (FOR USE IN RELATIVE ADDRESSING 

BRA BPI JUMP OVER LOCALS 
PRTIBUF FDB a POINTER TO PRINT BUFFER 
BUFSZ FDB a SIZE OF PRINT BUFFER 
BUFCNT FDB @ NUMBER OF CHRS IN BUFFER 
SNDCHR FDB a POINTER INTO BUFFER FOR CHR BEING SENT 
STRCHR FDB @ POINTER INTO BUFFER FOR CHR BEING STORED 
PRNTSV FDB a SAVE AREA FOR VECTOR TO ORIG PRNT ROUTINE 
* 
* SEE IF ENOUGH ROOM PROVIDED 
BPI TFR UsD PUT SPACE ALLOWED IN D 

SUBD #BPSZ+5 AMOUNT NOT AVAILABLE FOR BUFFER 

BCC BPIA IF ROOM FOR AT LEAST 1 BYTE BUFFER 

LDA #ERRZ4 BUFFER NOT BIG ENOUGH 

RTS 
* SET UP FOR BUFFERED PRINTING | 
BPIA ADDD #1 {ACTUAL SIZE OF BUFFER) J 

=H 8 BUFSZ-BPsxX SAVE BUFFER SZ 

LEAY BPSZ+3:X POINT AT BASE OF BUFFER 

STY PRTBUF-BPsxX SAVE IT 

LEAY D:¥ POINT BEYOND END OF BUFFER 

CLR s¥+ SAY NO VALID OVERLAY FOLLOWS 

STY FOLYLOC THIS IS WHERE NEXT OVERLAY GOES 

STX BPTME+4-BP:sX MODIFY LDX COMMAND 

STX BPOUT+3-BPsX (SO IT KNOWS WHERE LOCAL WS I5) 

LEAU BPTME-BPsX POINT AT TIME ROUTINE 

DOS TIME:ON PLUG IT IN 

LDU >PRNT GET ADDR OF ORIGINAL PRINT ROUTINE 

STU PRNTSV-BPsX SAVE IT 

LEAU BPOUT-BPsX POINT AT ENTRY FOR BUFFERED PRINT 

STU > PRNT 

LDU 235 RET ADR TO USER 

PSHS U (BYPASS NORMAL RETURN THRU UN-DO) 

CLRA SAY DONE OK 


CE TSM 


PAGE 


@1i940 
@i9sa 
21974 
197 
19388 
Biv7e 
B2008 
2018 
Aza2a 
B2838 
2048 
B2A58 
22068 
@2078 
OB208 
2098 
2188 
B@2i1a 
Q@21208 
2132 
@2148 

2158 
2168 
@21728 
22188 
@2192 
Q2208) 
2210 
B2220 
B2238 
2240 
B2258 
O2268 
B2278 
2288 
B2290 
O2308 
2312 
B2328 
G2338 
2348 
2358 
2368 
023708 
Q2388 
GB239R 
22488 
2418 
OB2428 
2438 
2448 
@2458 
O24468 
2478 
Aa2488 

2498 
B2528 
@2518 


@45 


B2543A 
A@2549 
Q@2558 
25514 
Q@2552A 
A255 3A 
@2554A 
25554 
B2556A 
25574 
B255B8A 
B2559A 
G25 4684 
B2561A 
25624 
B25 634 
25644 
@2565A 
B25 466A 
@25674 
A@25468A 
B25697A 
25784 
O@25714 
B25 724 
B25 734 
B25 74A 
B25 735A 
B25 764 
O2577 
825784 
B25 79A 
23884 
A25814 
25824 
@2583A 
B2584A 
B2585A 
B2586A 
G@2587A 
2I8BA 
B2589 
B2590 
B2Z591A 
@25924 
@2593 
25944 
@2595A 
B2596 
B2597A 
G@259B8A 
B2599A 
B2580A4 
B2601A 
G2682 
BZ6Q3A 
B25044 
@2685A 


OLY2 


17A6 


17A7 
117A? 
L7AC 
17AD 
17AF 
i7Bi 


17B4 : 


17B6 
17B8 
17BA 
17BC 
17BE 
17C@ 
17C2 
17C4 
17C?7 


i7CA = 


.SA:o 

39 

34 2 A 
BE ana A 
5D 

24 30 17DF 
EC a8 A 
1DAB @& A 
25 @6 i17BC 
85 ai A 
35 82 A 
24 FR  17AF 
EE a4 A 
EC ac A 
33 «CB A 
C3 Baal A 
1QA3 6 A 
= 2  17CE 
ED ac A 
Ab E4 A 
A? C4 A 
EC a8 A 
cB aMal A 
ED @8 A 
35 2 A 
EC a8 A 
25 FC  17DF 
33 89 QOA7 A 
EC @E A 
FD @41A A 
EC @4 A 
FD 625 A 
35 48 A 
ED 62 A 
39 

7E = aaa A 
SE aaa A 
EC a8 A 
27 FS 17FC 
EE a4 A 
EC @A A 
AS CB A 
AD 98 BE A 
#6 EB 17FC 
EC @A A 
C3 «aaa A 
19A3 B6 A 


DoS —- PAGING & OVERLAYS 


% 
* SEND 
BPOUT 


BPOW 


BPOLA 


BPO? 


* WAIT 
BPOS 


K 
* TIME 
BPTME 


RTS 


& CHARACTER TO THE PRINTER VIA BUFFERED 1/0 


PSHS 
LDX 
Tate 
BNE. 
LDD 
CMPD 
BCS 
LDA 
PULS 
BCC 
DSABL I 
LDU 
LDD 
LEAU 
ADDD 
CMPD 
BCS 
CLRD 
STD 
LDA 
STA 
LDD 
ADDD 
STD 
ENABL I 
PULS 


As Ka 

#2 (THIS INSTR MODIFIED BY SETUP LOGIC) 
REQUEST TO SHUT DOWN? 

BPOS 


BUF CNT-BPs X 
BUFSZ-BPsX ROOM FOR MORE? 


BPOLA IF ROOM 

#1 SET NON-Z COND 
AarXsV 

BPOd IF NO ROOM 


PRTIBUF-BPs X 
STRCHR-BP:X DISPLACEMENT IN BUFFER 


Ds POINT AT NEXT STORE POSITION 
#1 

BUFSZ-BPsX WRAP AROUND? 

BPO? IF NO 


STRCHR-BPs X 


+S (CHR TO BE PRINTED) 
oU 

BUF CNT-BPs X 

#1 


BUF CNT-BPs X 


As XsUsPC 


FOR BUFFER TO EMPTY 


LDD 
BNE 
LEAU 
DOS 
LDD 
STD 
LDD 
STD 
PULS 
STD 
RTS 


BUF CNT-BPax EMPTY YET? 


BPOS IF NO WAIT 

BPTME-BPsX POINT AT TIME ROUTINE 

TIME: OFF UN PLUG IT 

PRNTSV-BP;X GET ADDR OF ORIG DRIVER 

>PRNT RESTORE IT 

PRTBUF-BPsX WHERE NEXT OVERLAY SHOULD HAVE GONE 
FOLYLOC 

U {RET ADDR) 

295 I’M SET TO RETURN VIA UN-DO) 


INTERVAL DRIVEN PRINT LOGIC 


JMP 
LK 


7 
# 


(TO NEXT TIME ROUTINE) 
(INSTRUCTION MODIFIED BY ABOVE LOGIC) 


* IS THERE DATA IN THE BUFFER TO BE SENT TO PRINTER? 


* TRY TO SEND 


LDD 
BE@ 


LDU 
LDD 
LDA 
JSR 
BNE 


BUF CNT-BPs X 

BPTME IF NOs EXIT 

IT (PRINTER MIGHT NOT BE READY) 
PRTBUF-BPsxX POINT AT BUFFER 
SNDCHR-BPsX DISPLACEMENT WITHIN BUFFER 
DU GET CHR OUT OF BUFFER 
[CPRNTSV-BPs XJ 

BPTME IF PRINTER WAS NOT READY 


* ADVANCE BUFFER POINTER 

SNDCHR-BP ss X 

#1 

BUFSZ-BPsX IS POINTER WRAPPING AROUND END OF BUFFER? 


LDD 
ADDD 
CMPD 


Se LLCO 


PAGE 8464 OLY2 »54:@8 DOS —- PAGING & OVERLAYS ) 
Q2520 @246@65A 1819 25 Fa igiD BCS BPT 1 IF NO 

@2530 @24607A i8ibB CLRD 

022548 @26@84 i181D ED a4 A BPTI STD SNDCHR-BP;X SAVE POINTER TO NEXT CHR 

22558 @24689 * ADJUST BUFFER COUNT 

O@256@ @261@A 181F EC ag & _DD BUFCNT-BPs X 

@2570@ @2611A 1821 83 AAaGi ra SUBD #1 

02580 O@24612A 1824 ED 23 & STD BUFCNT—-BPs X 

02598 O2613A 1825 22 D4 ivr BRA BPTME EXIT (ONLY SEND ONE CHR PER INTERUPT'! ) 
O2600 O@24614 * 

AVSiA BS4i5 KEKKEEREEEEKREEREEEEEEREEHEHHEREEREEREEE 

2620 @2616 * BUFFERED KEYBOARD INPUT OVERLAY 

O27638 02617 HEE ERR KEE K EMER KERR EERE EEE EEE EEE 

2648 @2618A 1828 @acs & Bld FDB Bi7-Bié 

226580 @2619 GAaD3 A BPSZ EQU Bié-Bi5 {FOR PREVIOUS ROUTINE’S USE) 

Q@2660 @2620 1828 A BK EQU Bid 

@267@ @2621A 182A 23 ZC 1838 BRA BHA JUMP OVER LOCALS 

24680 @26224 182C @aaz A& KEYBUF FDB a ADDR OF KEYBOARD BUFFER 

@2690 O@2623A 182E BBAG A&A KEYSZ FDB @ SIZE OF KBD BUFFER 

@27@G O@2624A 1830 ral Fal Fad a] & KEYCNT FDB @ NUMBER OF KEYSTROKES IN BUFFER 

@27108 @2625A 1832 AAA A SNDKEY FDB 2 DISPLACEMENT TO NEXT KEY TO GIVE USER 
O2720 B26264 1834 AAAA & STRKEY FDB @ DISPLACEMENT FOR STORING NEXT KEYSTROKE 
@2730 @2627A 1836 AGAa A KEYSV FDB 2 SAVE AREA FOR ADDR OF ORIGINAL KBD ROUTINE 
@2740 @2628 % 

@2750 @2629 * SET UP FOR BUFFERED KBD 

02760 @2463@0A 1838 1F 3a A BI TFR UsD PUT SPACE ALLOWED IN D 

@2778 @26314 1834 83 @acé = SUBD #PBKSZ+5 AMOUNT NOT AVAILABLE FOR BUFFER 

02780 O@2632A 183D 24 a3 1842 sScc BALA IF ROOM FOR AT LEAST 1 BYTE BUFFER 
22790 @2633A4 183F 86 ee & LDA #ERR2Z8 BUFFER NOT BIG ENOUGH 

@2800@ O@2634A 1841 39 RTS 

02818 @26354 1842 C3 @A@i1 A BRIA ADDD #1 {ACTUAL SIZE OF BUFFER) 

22820 @2636A 1845 ED @& 8 STD KEYSZ-BKsX SAVE BUF SZ 

22830 O2637A 1847 31 B9 @@C8 A LEAY BKSZ+3:X POINT AT BASE OF BUFFER 

@2840 O@24638A 1848 1@AF 4 a STyY KEYBUF-BK =» X 

@2850 O24639A 184E 31 AB a LEAY D:¥ 

02860 0246404 185@ 6F AB a CLR 5¥+ SAV NO VALID OVERLAY FOLLOWS 

22872 O2641A 1852 10BF @62 A Sry SOLYLOC NEXT OVERLAY GOES HERE 

@2880 026474 1856 AF 89 @@82 4 Six BKTME+4-BK:X MODIFY LDX INSTR 

22892 026434 185A AF 89 @@55 A ST xX BKGIVE+3-BKsX DITTO 

@290@0 0246444 185E& 33 89 @@7E A LEAU BATME-BK 4 X 

029180 O24645A 1862 DOS TIMEs;ON PLUG IN TIME RTN ' 
Q2920 B2646A 1868 FE Beic A LDU >KEYIN VW 
22930 @24647A 1868 EF BE A STU KEYSV-BK 5 X 

029480 @2648A4 186D 33 89 @@52 4 LEAU BAGIVE-BKs X 

22950 @2649A 1871 FF GSiC a STU >KEYIN 

02960 @265@A 1874 EE 62 a LDU 235 

02970 @2651A 1876 34 42 fa PSHS YU 

O298@ @2652A 18795 4F CLRA 

02998 B@2653A 1879 39 RTS 

3008 O@2654 * 

23018 @2655 * POLL FOR A CHARACTER TO GIVE USER 

3020 @24656A 187A 34 54 & BKGIVE PSHS Ba Xs 

23030 @2657A 187C SE ral Fal fala) ra LDX #2 (THIS INSTRUCTION MODIFIED BY SETUP) 
03048 @2658A 187F EC ats A LDD KEYCNT-BRKsX COUNT OF BUFFERED CHRS 

23052 @2659A 1881 26 a 1885 BNE BAGIL IF ONE TO SEND 

23060 @24660A4 1883 35 D4 Ay PULS BsXsUsPC IF NONE: EXIT WITH A=ZERO 

23072 @2661A 1885 EE a4 A BKGI LDU KEYBUF-BKsX ADDR OF BUFFER 

3080 O@26624 1887 EC GA fa LDD SNDKEY-BKsX DISPLACEMENT 

03290 026634 1889 33 CB os LEAU DsU POINT AT CHARACTER 


PAGE 


23128 
03112 
@3120 
23132 
83140 
3150 
43168 
23170 
03180 
03198 
@3208 
23218 
A322 
Q3230 
G3240 
Q3250 
3262 
Q3278 
A328 
23292 
A3308 
23318 
G3320 
Q3332 
@3348 
23358 
83368 
23372 
@3388 
Q3392 
23428 
83418 
@3420 
Q3438 
03448 
4345@ 
43468 
43472 
03488 
23492 
@35aa 
@351@ 
@3528 
23530 
43548 
@3550 
@35628 
43578 
@3582 
Q@35972 
23688 
@3618 
3628 
236328 
3642 
Q365@ 
23668 
83672 


@47 OLYe 


O@2664 
26654 
BZ666A 
B2667A 
B2663A 
B@2669A 
26784 
@26714A 
O267 24 
OB26734 
ZO7SA 
B2675A 
B2676A 
O@2677 
B2578 
B2679A 
AZ68QA 
B26B14A 
O@2682A 
B26B834 
2684 
Z685A 
ZOB6A 
@2687A 
B2688A 
B26B89A 
B2690A 
O@2691A 
Z2O92A 
B2693A 
B2694A 
Q@2695A 
B2695A 
Z2697A 
@269B8A 
B2699A 
2/74 
B2701A 
B27 824 
B27B83A 
B2704A 
@27854 
@2 726A 
B27Q7A 
@2788A 
2789A 
B2718A 
Oey st 
2712 
@2713 
@2714 
@2715 
B2716 
B2717 
@2718 
Q@2719 
B27 204A 


@27214 18EF 34 


188e2 
188E 
1891 
1893 
1895 
1897 
1eer7 
189R 
189D 
18a 
1BAz 
1844 


18A6 
isa? 
1BAC 


1BAE 


18B1 


18B3 
18B6 
i8BS 
18BA 
18BCc 
i8ca@ 


18C2 2 
18C4 = 


i8cé 
18c? 
18CA 
18CcC 
18CE 
18Da 
i8Dz2 
i8D4 
18D7 


i8DA =z 


18DCc 
18DE 
1BE@ 
1SE2 
18E5 
18E7 
1BE? 


iGEB . 


iSED 


CES 


DOS - PAGING/ & OVERLAYS 


* ADJUST POINTER TO NEXT POSITION 


ADDD #1 
CMPD KEYSZ-BKsX WRAP AROUND? 
BCS BAGI IF NO 
CLRD 
BAG STD SNDKEY-BK s X 
LDA 3 
PSHS & 
LDD KEYCNT—-BK s+ X 
SUBD #1 
STD KEYCNT—-BKs X 
TST 3S 
PULS Ds XsUaPec 
* 
* TIME INTERVAL KEYBOARD SCAN ROUTINE 
BKTME IMP > TO NEXT TIME ROUTINE 
LDX #2 {MODIFIED BY SETUP) 
BKTMEA LDD KEYCNT-BKs X 
CMPD KEYSZ-BKsX IS BUFFER FULL? 
BCS BRAT i IF NO 
* BUFFER IS FULL - GO BEEP 
LDX #U4EDR 
LDA aX 
EORA 2 COMPLIMENT SOUND BIT 
STA 5X 
LDY #20 PULSE WIDTH 
BRT@ LEAY m~isy¥ 
BNE BAT@ 
BRA BATME EXIT 
BHT i JSR CKEYSV-BK;sX] GO POLL KEYBOARD 
TSTA 
BE® BATME IF NO NEW KEYSTROKESs EXIT 
PSHS fa) SAVE KEY 
LDU KEYBUF-BRK 5 X 
LDD STRKEY-BKsX DISPLACEMENT TO SAVE LOC 
LEAU DsU POINT AT SAVE LOC 
ADDD #1 POINT TO NEXT SAVE LOC 
CMPD KEYSZ-BKsX WRAP AROUND? 
BCS BAT 2 IF NO 
CLRD 
BRATZ STD STRKEY-BKs X 
LDD KEYCNT—-BK + X 
ADDD #1 
STD KEYCNT—BK 5 X 
PULS & 
STA a 
BRA BRTMEA GQ CHECK FOR ANOTHER KEY DOWN 


* 


He He EE IEEE EEE EERE EE EEE ERE KEEH EEE EREKREEREK ERE RE KERR EE EE EERE 


OR Ok KK 


U-" 
Y~> 


COPY FILE OVERLAY 

GIVEN: B (BIT @) = ZERO IF NO DISK SWAPPING: 1 IF SWAPPING 
SOURCE FILE DCB (UNOPENED) 

DEST FILE DCB (UNOPENED) 

USES MEMORY FROM "OLYLOC" TO "MAXMEM" 

USES LAST LINE ON SCREEN FOR PROMPTS IF SWAPPING DISKETTES 


HERE EEE EEE EEE EERE EE EKR KE EREERKE REE ER HEEKEEKEEEEE REE EERE EER ERE 


A Bi? 


FDE 
PSHS 


Bi8-Bi7 
DsXs¥sV 


PAGE 


23682 
3698 
@37 22 
23718 
23722 
@3738 
83742 
@3758 
@3768 
Q3778 
@3738 
O3798 
A23888 
23818 
Q3828 
B3838 
23842 
Q3858 
23868 
43878 
23882 
A3898 
23988 
@3912 
23928 
3938 
3948 
@23958 
239762 
23978 
23788 
23998 
A4002 
24018 
24020 
O48328 
4042 
2425 
4862 
O487@ 
G488@ 
O4898 
4412@ 
04114 
G4122 
24138 
24148 
04158 
04148 
@417@ 
04188 
G@4192 
42828 
G@4218 
B4228 
B4232 
Q424@ 
A425 


@48 


OLY2 


2 OAS 


@2722A 18F1 32 


27234 
2724 
2725 
2724 
2727 
@2729 
2729 
@273a 
2731 
2732 
Q@2733 
O27 34A 
O2735A 
27354 
2737 
2738 
B2739A 
27424 
O27414 
27424 
27434 
27444 
O2745A 
27464 
O2747A 
Q274BA 
D2749A 
O2758A 
B2Z751A 
B2752A 
27534 
27544 
@2755A 
2756 
2757 
@2758A 
O2759A 
B27 40A 
2741 
27424 
B27 SBA 
27444 
O2745A 
O2746A 
D2Z747A 
278A 
@2749 
2772 
O2771A 
27724 
Q2773A 
O2774A 
Q2775A 
O2776A 
Q2777A 
@2778A 
Q2779A 


18F 3 


18F5 
L935 
bi ge 


je es Be 
957 
i954 
195D 
FoF 
19768 
be a 
19763 
1944 
19766 
i968 
196A 
i94D 


1978 2 


1972 


973 3 


i975 


1977 
1979 


197s Z 


i?7D 
tbe oF i oa 
1982 
1984 
1987 
198D 
198F 


1991 
1995 
1997 
1999 
199R 


ae 


I9SeE 
19A1 
19A5 


2@ 


Q 
7A A 
68 1955 
4c A 
4C A 
4C A 
a1 A 
CB zi oA 
AS Zi OA 
Qi 1948 
&7 A 
E4 A 
oz A 
&4 A 
@apc A 
Q625 A 
@3 1975 
51 19C6 
iD A 
bo A 
&7 A 
i@ 198D 
48 A 
88 48 A 
@pD 1991 
Sb A 
bo A 
Fé A 
O5EQ A 
20 A 
aa A 
AQ A 
F9 1997 
Qb21 A 
ap A 


DOS —- PAGING & OVERLAYS 


LEAS -4:5 
BRA Bi7Aé 
*# 3S COUNT OF SECTORS IN MEMORY 
* 1;S5 EOF SW 
* 25S=NEXT INPUT PRN 
* 4,55=NEXT OUTPUT PRN 
* 6;5=P6S AVAIL 
* 753S=SWAP SW 
* 8;5=BASE 
* 14@;S=DEST DCB ADDR 
* 12;:5=SOURCE DCB ADDR 
* 14,;5=RET ADDR 
Bi7M1 FCC /LOAD SOURCE DISKETTE / 
Bi7M2 FCC LOAD DESTINATION DISKETTE / 
Biv7M3S FCC /LOAD S ¥Y S TEM DISKETTE - 
*& 
* SETUP STACK 
BI7A ANDB #1 SET To 1 OR @ 
LDA DCBDRV;sU 
CMPA DCBDRV;Y SAME DRIVE? 
BE Bi7B IF YES 
CLARE 
Bi7B STB 735 
CLRA 
CLRB 
STD 35 
STD 2a STARTING INPUT PRN 
STD 455 STARTING OUTPUT PRN 
LDD >MAXMEM 
SUBD SOLYLOC HOW MUCH MEM TO WORK WITH 
BCS Bi7Bi IF NOT ENOUGH 
TSTA 
BNE Bi7c IF AT LEAST 1 PAGE 
Bi7B1i LDA #ERR2Z9 NOT ENOUGH MEM 
* 
* COMMON EXIT 
Bi7x STA 35 
TST 73S 
BE Bi7XIT 
* RECOVER SYSTEM DISKETTE 
LDX 8355 
LEAX Bi7M3-B1i75 xX 
BSR Bi7WTE 
LDU #MSGDCB 
DOS OPEN: INPUT TO RE-LOAD FAT TABLE 
Bi7XIT LEAS 435 
PULS Ds Xs¥sUsPc 


€ 


* DISPLAY FLASHING MSG & WAIT FOR DISKETTE SWAP 


Bi7WTE LDY 
LDE 
Bi7WTi 


BiI7WTS 
CMPA 


SYSTEM 


#E400+5 12-32 


#32 
sX+ 
a¥+ 


Bi7WT 1 

2 CLOocK+t 
POL CAT 
#EAD 


(LAST LINE) 


WAIT FOR KEYSTROKE 


CTS 


ry 


PAGE 


24268 
B4278 
G4282 
B429R8 
A4 328 
@431a 
@4328 
44338 
44348 
@4358 
A436 
437 2 
A438 
B4390 
44428 
A441 
44420 
04438 
4448 
O4452 
A446 
04472 
A4438 
A449 
B4580 
44518 
44528 
@4538 
2454 
Q4558 
456 
O45 7 
G458@ 
B4572 
244088 
24612 
4628 
M4438 
A4648 
@24658 
44662 
04472 
@468@ 
Q469@ 
2472 
24718 
G47 28 
44738 
4743 
84758 
@4768 
247728 
A478 
24792 
B48A8 
24812 
@4828 
4838 


O49 


@27384 
B2781A4 
B2782A 
AZ783A4 
B27844 
27854 
O@27386A 
A27B7A 
@2788A4 
27894 
B27 S24 
B2791A4 
B27 924 
B27934 
Be? PAR 
B2795A 
2796 
B27 974 
2173 
B2799 
AZBAaZ4 
@2801A 
AZBALA 
B2883A 
A2Ba4A 
@2885 
M@2886A 
B2887A 
A284 
B28a9A 
@28184 
B2B11A 
B28124 
@28134 
2814 
@2815A 
@2816A 
A@2Z817A 
@28184 
B2819A 
Q28204 
@2B21A 
G@2B22A 
B28234 
B2B244 
Q@2825 
A226 
B2B27A 
@2B28A 
B2829A 
B28304 
B2831A 
AS28324 
AS28334 
A@2834A 
28354 
A@2836A 
28374 


OLYS 


197A? 
19AP 
LFAC 
LPAF 
ifB1 
19B2 
197B4 
19BS 
i9BS 
1SBA 
1?7BC 
19BE 
19°BF 
ifci 
19C3 


2 7Go 


19C& 


i97cs 
1eca 
19CD 
19D@ 


19Dz 2 


i9D4 
i9Dé 
i9D8 
19DA 
ifE@ 
IFES 
19E4 
LSE¢ 


19E9 
1FEC 
19EE 
19F@ 
19F2 
19F4 


19F6 § 
19F7 2 


i9F9 
19FB 


19FD 


iAma = 


1ABZ 
1485 
1A@7 
LAGA 
1A@D 
1A1@ 
1A13 
{A115 
1A17 


bp b> Li 


bPDpDOrp>P bP 


> 


DOS —- PAGING & OVERLAYS 
BE BivWTx 
LDX #$400+512-32 
LDA >CLOCK+1 
ANDA #E-O 
LSLA 
PSHS & 
DB #32 
Bi7WTS LDA a X 
ANDA H“AIMLLi111i1 
ORA 33 
STA gX+ 
DECB 
BNE Bi7WT3 
PULS & 
BRA BivWTz 
Bi7WTX RTS 
¥ 
Bi7c STA 63S PAGES AVAILABLE 
*% 
* LOOP To COPY FILE 
Bi7D LDU iZsS SOURCE 
LDD SOLYLOC 
STD DCBBUFs U 
TST 735 SWAPPING? 
BES Bi7De IF NO 
* WAIT FOR SOURCE DISKETTE 
DX 835 
LEAX Bi7Mi-Bi7sX 
BSR Bi7WTE 
Bi7Da Dos OPENs INPUT 
BNE Bivx IF NOT FOUND 
_DD 235 
STD DCBPRN;:U SET STARTING SECTOR NUMBER 
BNE Bi7E IF NOT FIRST TIME 
* FIRST TIME - SAVE DIRECTORY DATA IN OUTPUT DCB 
LDY 1@.S 
LEAU Lia 
LEAY 11s¥ EXCEPT FOR NAME 
LDB #32-11 
Bi7Di LDA 5 U+ 
STA s¥+ 
DECB 
BNE Bi7Di 
LDU 12:5 SOURCE 
BI7E CLR 1S SECTORS IN MEMORY 
* 
* LOAD LOOP 
B1i7F JSR CSENT XLATE PRN INTO TRACK & SECTOR 
BNE BivFi TF OUT OF RANGE 
JSR DSKRED DO PHYSICAL I/0 
BNE Bi7xXxX IF 1/70 ERR 
L.DD DCBPRN: U 
ADDD #1 
STD DCBPRNs U 
INC DCBBUFs U 
INC 35 COUNT SECTORS READ 
LDB 55 
CMPB 635 IS BUFFER FULL 


PAGE 


24848 
24858 
24868 
24872 
24888 
24892 
24908 
24912 
B4928 
24938 
24948 
04958 
24968 
84978 
84978 
84998 
25808 
@25801@ 
Q@5028 
25838 
Q25042 
Q25852 
258628 
Q587@ 
A528 
25898 
2518 
@511@ 
Q@5120 
@513a 
@5148 
@515@ 
@5168 
05172 
25188 
@2519@ 
G5 208 
25212 
Q@522 

B5232 
25248 
@5258 
@5268 
Q5272 
@5 288 
Q5292 
@5 388 
Q25318 
@5328 
25338 
@5342 
Q5352 
25368 
05372 
@5382 
25392 
Q5420 
25414 


G52 


228384 
QZ2839A 
Q23404 
2841 
Q2842 
B2843A 
2344 
@2845 
B28464 
228474 
228484 
2B49A 
A238584 
@285 1 
@2852 
B2853A 
Q28544 
@2855A 
@2856A4 
@2857A 
Q2858A 
@2859A 
B286BA 
28614 
B2B624 
AS28634 
@Z864A 
228654 
2866 
Q@2B67 
B28684 
@2869A 
28784 
B2871A 
@28724 
82873 
@2874 
228754 
B2876A 
B2877A 
@2878A 
22379 
@288R4 
2881 
22882 
Q2883A 
B28844 
B2885A 
228864 
23874 
28884 
Q2B889A 
B28984 
Q2891A 
@2892 
2893 
2894 
Z2B95A 


OLYS 


1A19 
1A1B 
1A1iD 


1A2@ 


LAZ2 
LAZS 
1A27 
1AZD 


1A2F : 


1A31 
1A33 
1A35 
1A37 
1A3A 
1A3D 
1ASF 
1A42 
LA445 
1A4B 
1A4D 
LA4F 
1A51 


»~5A:8 
26 id 19FD 
2@ @5 1AZz 
16 Prar: 2eee 
&C 61 A 
EC C8 29 A 
ED 62 A 
AS E4 & 
re 4 EC 1A1D 
6D 67 A 
ai 28 1AS3D 
AE 68 A 
38 88 28 A 
17 FFS4 1991 
tod 6A A 
FC G25 A 
ED C8 24 4 
ae ate) 1A53 
81 ac & 
ee A 1@ 1A&1 
2@ CA 1AiD 
EC 64 A 
26 bs 1A69 
B84 1E A 
22 BC 1A1D 
EC 64 A 
at B4 1A69 
B& iF A 
2 B4 1A1D 
ED cS 29 ay 
BD Q2D9F & 
26 AC 1A1D 
BD QCEA A 
1926 FEFF 1977 
EC CS 29 & 
C3 AZ 1 A 
ED C8 29 A 
6C C8 24 4 
64 E4 A 
26 E4 1A6C 
EC C8 29 A 


——————W____ . . .....U.U.U. [(=£EWDTASI 


DOS - PAGING & OVERLAYS 


BNE Si 7 IF NO 
BRA Bi7G GO WRITE IT 
BivXX LBRA Bi7x THIS STMT USED AS AN UP-LINK 
¥ 
* INPUT AT END —- SET EOF SW 
Bi7Fi INC i:5 
¥ 
* CLOSE INPUT 
Bi7G LDD DCBPRN: U 
STD 235 SAVE FOR NEXT BATCH 
DOS CLOSE: IT 
LDA 25 ANY SECTORS READ? 
BE® Bi7xxX IF NOs I°M DONE 
* 
® OPEN OUTPUT 
16% 735 SWAPPING? 
BE® Bi7H IF NO 
L.DX 835 
LEAX Bi7M2-B1i7+s xX 
LBSR Bi7WTE WAIT FOR DESTINATION DISKETTE 
Bi7H LDU i@s5 OUTPUT FILE DCB 
LDD POLYLOC START OF BUFFER 
STD DCBBUFsU 
DOS OPENs OUTPUT+FAST 
RES Bi7Hi iF Pile ExiSrs 
CMPA #iz 
BE® Bi7H2 IF CREATED 
BRA Bi7XxX IF OTHER ERROR 
% 
#-FILE Exists 
Bi7Hi LDD 435 
BNE Bi7tI IF NOT FIRST TIMEs ITS OK 
DOS CLOSE: IT 
LDA #ERR3G 
BRA Bi7XX 
* 
* FILE CREATED 
Bi7H2 LDD 435 
BES Bi7I IF FIRST TIMEs OK 
LDA #ERRS1 MISC ERR 
BRA Bi7Xxx 
* 
Bi7iI STD DCBPRNs U 
¥ 
* WRITE LOOP 
Bi7Jd JSR CSENT XLATE PRN INTO TRACK & SECTOR 
BNE Bi7XX 
JSR DSKWRT WRITE SECTOR 
LENE Bi7x 
LDD DCBPRNs U 
ADDD #1 
STD DCBPRN:U 
INC DCBBUF +s U 
DEC 35 COUNT DOWN SECTORS WRITTEN 
BNE BivJd 


* 


* CLOSE OUTPUT 


LDD 


DCBPRNs U 


CERI 


‘= 


PAGE 


@5428 
0543 
@5448 
O5452 
25468 
@5472 
25488 
5490 
AS55808 
@5518 
@5528 
@5538 
45548 
@5558 
25568 
@557@ 
@558@ 
Q@5572 
@5680 
Q561@ 
@5628 
@5632 
25640 
@5658 
@5660 
456708 
@5680 
@5692 
@57aa 
@3571@ 
@5728 
@5738 
25742 
@3575@8 
@5762 
@577@ 
45782 
@35772 
@5808 
@581@ 
@5828 
05838 
@59408 
Q5850 
@5860 
05870 
25880 
@5892 
Q@5922 
25918 
5920 
O5938 
@5940 
@25958 
@5 762 
25978 
A598 
O599@ 


@51 


B2896A 
B2897A 
@2898A 
B2B994 
= 7QGA 
29014 
B29824 
G@2983A 
B2904A 
O@2905A 
A2906A 
BZ9Q7A 
2788 
2989 
GB2918 
2911 
@2912 
B2913A4 
B2914 
@2915A 
B2916A 
B2917A 
29184 
B2919A 
B29204 
B2921A 
B29224 
B29234 
B2924A 
B2925A 
B2926A 
2927 
B2928A 
B2929A 
B2938A 
@2931A 
B29324 
B2933A 
B2934A 
B29354 
B29 36A 
B2937A 
29384 
B29 39A 
29484 
29414 
29424 
B2943A 
B2944A 
B2945A 
A2946A 
B29474 
G@29484 
B29494 
A2950A 
GB2951A 
29524 
B2953A 


OLYS 


LABB 
1A8D 
1A9@ 
1A93 
1A95 
1A97 
1A99 
LA9C 
LAAZ 
1AAZ 
1AA5 
LAA9 


1AAC 


LAAE 
1ABQ 
1ABZ 
LABS 
1AB7 
1AB9 
LABB 
1ABD 
1ACIi 
LACS 
1ACé 
1AC7 


1ACc9 
1ACC 
LACE 
1AD1 


1AD3 2 


LADS 


L1AD7 .; 


LAD? 
LADB 
LADD 
LADF 
1AES 
1AES 
1AESG 
1AES 
1AEA 
LAEC 
LAEE 
LAFQ 
LAFS 
LAF4 
LAFS 
1AFS 
1AFA 
LAFC 
LAFE 


1 
FF74 
FFIC 


rPrPrprprppp 


& 
1A1D 
i9Cces 


>r>rPPrPrPrprprp 


-— 
b> 
3 

» > 


DOS - PAGING & OVERLAYS 


SYD 435 SAVE FOR NEXT BATCH 
SUBD #1 

STD DCBMRB: VU 

LDX 12:5 SOURCE DCB 

LDD DCBNLSs X 

STD DCBNLS:U 

STB DCBMRB+25 U 

DOS CLOSEs IT 

CLRA 

TST isS AT EOF? 

LENE Bi7Xx I?M DONE 

LERA Bi7D GO COPY ANOTHER BATCH OF SECTORS 


% 

HHEK KEE HERE EEE EEE REE EEE REE 
* GET MULTIPLE USER INPUTS 
* GIVEN B=NUMBER OF INPUTS 
EEKKEKEKEEE EERE EEE EEE EEE REE 


Bis FDB Bi9-Bi8 

INPTS EQU i8 
LDA #1 
PSHS D 

Bisa LDU #$400 
LDEB 35 

Bi8c LDA sU+ 
CMPA #$5B Cc 
BEG BigsD 
CMPU #$620 
BCS Bisc 
LDU #E401 

BispD DECB 
BNE Bisc 

* INPUT A FIELD 
CLR CLOCK+1 
LEAX —1sU 

BiSeE LDE CLOCK+ 1 
ANDEB #14 
BEG Bisel 
LDA #658 
BRA BIiSEZ 

Bi8E1 LDA #$1B 

BIiSES STA 3 X 
PSHS Xs 
SYSTEM POLCAT 
PULS Xa 
TSTA 
BE® BiSE 
CMPA #BREAK 
BEG Bigx 
CMPA #DOWN 
BE® BiSF 
CMPA #UP 
BE Bi8G 
CMPA #ENTER 
BEG Bigsx 
CMPA #LEFT 
BEG Bis! 
CMPA #E20 
BCS BiSBE 


0 ee 


PAGE @52 OLY? -5A4:°@ DOS — PAGING & OVERLAYS i, 
@6008 O@29544 1B@@ Bi 5B a CMPA #$5B 

@$601@ @29554 iB@2 25 2@ 1B24 BCS B1iSH 

@46020 @2956A 1P@4 81 46@ & CMPA #450 

@6030 @29574 1B@6 25 i¢ 1B24 BCS B1i8H 

G604@8 @2958A 1B@e 2a C4 1ACE BRA Bi8SE 

@405@ 82959 * DOWN 

26068 O@29460A 1BAA AS E 4 & BISF LDA 35 

@4078 @29461A iB@C Al &1 4 CMPA i:5 

Q24608@ O@2967A IBGE 24 AE IBIiE BCC BigsGl IF AT END ALREADY 
24090 O@29634 1Bi@ 4c INCA 

@61@08 @29444 1Blii A? E 4 4 STA 1S 

@4611@ O@2965A 1Bi3 2a ay IBIE BRA Bisel 

5128 @2946 * UP 

@5130 @29467A iBiS A& E4 & B18G LDA 3S 

5140 @294684 iBi7 1 i ray CMPA #1 

@4150@ @2969A iB1i9 27 a3 1BiE BE Big8Gi 

@4168 @29704 1BiB 44 DECA 

@6170 @2971A iBic A7 E4 A STA 35 

@6180 @2972A 1BiE 84 5B. A BIiBGi LDA #$5B 

@419@ @2973A iBz@ A7 4 ray STA 3X 

6200 @29744 1Be2 20 RE 1ABZ BRA Bige 

@462180 @2975 * TEXT CHR 

MS2280 829764 1BE4 GA 411 A&A BISH ORA #$40 

Q6238 @29774 1B26 A7 Ce A STA 5 + 

6248 O@29784A 1B28 AS C4 fa LDA si) 

@5258 O2979A iBzA Bi 5D & CMPA #$5D J 

@26268 @298@A 1B2C 27 DC 1B@A BES BiSF 

@5270 @2981A iBZE 2a 9E LACE BRA BiS8e 

424280 @2982 * BACK ARROW 

@4290 @2983A 1B3G AG Cz A Bist LDA i We 

@6388 @29844 1B32 84 BF & ANDA #ERF 

@431@ @2985A 1B34 Bi 1B A CMPA #E1B 

A25328 @2986A 1834 24 96 LACE BNE BigSe 

@53380 @29874 iBSS Ad Ca A LDA sU+ 

@45348 O@29868A 1B3SA 2a F 4 1B3a BRA Bist 

424358 @2989 * BREAK OR ENTER 

@636@8 @2990A 1B3C iF R9 &® BISxX TFR AsB 

@46378 O29914 1B3SE 32 62 A LEAS 235 

24388 @2992A 1848 84 5B & LDA #$5B " 
Q4390 O2993A 1B42 A7 84 A STA +X i, 
@45400 829944 1844 39 RTS 

@45418 @2995 * 

O@6428 O@2996 HREKKRKEREEERE RHEE E KEE REE EERE EERE E ER EEE 
G54348 82997 * SCAN FOR SELECTED DIRECTORY ENTRY 
Q4448 @29993 HEE EERE EEE EERE EEE EERE RE EEE EEE EE 
04458 @29994 12845 ABBY A B19 FDB B2Aa-B1i9 

@6468 @3eaaea a1 3 & SCNDIR Eu 19 

04470 @38@01A 1B47 BE CRAS & LDX $CAAS PARAMETER AREA 
464486 @3@@2A 1844 84 az ra LDA #2 READ 

@4492 @30@3A 1B4C A? 8A a STA 3X+ 

65088 @30@04A4 iB4E Ad C4 A LDA si) DRIVE 

@6518 @3@@054 iBS@ A7 BH & STA 3 X+ 

@6529 @3@@64 1852 cc 11@3 & LDD #H$11483 TRACK & SECTOR 
@45380 @38@7A4 1B55 ED Hd & STD 3 X+ LEAVE X -> SECTOR 
@6548 @32@8A 1857 1@8E @4ce & LDY #SYSBUF 

@555@ O838094 iBSB 1I@AF @i A STY 1:X 

@6568 @3@1@A iBSE Aé 41 es LDA is STARTING OCCURANCE 
@6578 @3011A 1B46@ Si 48 A&A BISA CMPA #72 ANY MORE ON THIS DRIVE? 


CES 


PAGE 


6588 
B6459R 
5508 
@6618 
G6620 
86638 
86648 
B65658 
65668 
6678 
6680 
6698 
G67 28 
6718 
G67228 
86738 
6740 
B6738 
6768 
86778 
@678@ 
Q67°R 
68a 
G6818 
6820 
868308 
6848 
G46858 
24868 
26872 
68a 
G689O 
G6928 
6912 
B49208 
Q6938 
6948 
Q@6958 
B6968 
Q4978 
A698 
6998 
a7 GAA 
87210 
7828 
7838 
7248 
27858 
@7A6a 
a7 A72- 
7A! 
a7a7ea 
7 18a 
@71i1@ 
O7128 
@7138 
47148 
@71i5@ 


@33 


GBGLZA 
BBAIBA 
A3Gi4A 
O3AisSA 
A@BALiSA 
ABAI7A 
ABAQLBA 
ABALSA 
ABAZAA 
ABAZLA 
ABAZZA 
ABALBA 
ABAZ4A 
ABAZSA 
ABAZoA 
ABBZ7A 
ABAz8 

ABAL9 

3038 

ABAB1 

ABABA 
ABABBA 
ABAB4sA 
ABABSA 
ABABA 
ABAB7A 
A@3BABBA 
ABABIA 
ABA4BA 
ABA41A 
ASA424 
B3843 

ABO444 
ABA4SSA 
A3A456A 
ABB4TA 
ABA4RA 
ABA49A4 
ABASAA 
A3O51A 
A305 

ABABA 
A3A544 
ABA55A4 
ABAS5SA 
ABASTA 
ABABA 
ABAS9 

A3IASAA 
A3AS1A 
ABASZA 
B3ASBA 
ABAS4A 
ABASSA 
ABQS6A 
ABASTA 
ABASBA 
BBASPA 


OLY 2 


iBé62 2 


1BS4 
1B4é 
iBSée 
LBOA 
iBdc 
iBSE 
iB7@ 
IB72 
1B73 
iB75 
1B?77 
1879 
1B7D 
IB7F 
iB&i 


1B83 
iBSS 
iB8?7 
IBS? 
iBSeE 
iB&SD 
IBF 
iB91 
IBS3 
iB95 
1B97 


1B99 
iBSB 
1BYD 
IBOF 
iBAI 
iBAS 
1BAS 


IBAA : 


iBAC 
iBB@ 
IBB2 
iBB4 
IBBS 


iBB? & 


1BRB9 
iBBB 
1 BED 
IBBF 
iBCci 
1BCS 
1BCS 
IBCé 
iBCS 
1BC9 


E23 iBC9 
Aa & 
24 iBdéec 
34 a 
FS iBd4 
@8 a 
a7 1877 
2@ A 
AB & 
ae iB&3 
7Q A 
SF CAaG4 A 
7a a 
a3 4 
44 1BC9 
58 a 
Ge. A 
z a 
A4 A 
ac ips? 
BA 1B99 
cea A 
2A & 
iF iBB4 
AQ A 
iD 1BRS 
68 a 
41 A 
41 & 
48 A 
zo 1BC9 
AB 22 & 
Aa7Ce8 A 
D7 1B&3 
@6C8 A 
84 a 
C3 ips 7 
A A 
Dd iBaF 
68 a) 
41 A 
4D 4 
28 A 
AB & 
Ca A 
Fe IBCi 
ai al & 


DOS ~- PAGING & OVERLAYS 


Bik 


Bi?c 


Bi?D 


BCC 
SUBA 
BCS 


BNE 


BiPNo 
#8 
Bige 


Ds ¥ 
Bi?Di 
Xs ¥sU 
C$C@@4 ] 
Xa Ya 
aX 
BiQN® 


IF IN THIS SECTOR 


DISPLACEMENT IN THIS SECTOR 
OFFSET TO 1ST ENT TO SCAN 


RESULT 
IF 1/0 ERR 


* COMPARE AGAINST ARGUMENT 
* REGISTERS: X-:SECTOR NBR 
$e 
* 


Y~>ENTRY IN BUFFER 
U->SEARCH ARGUMENT 


Bi9Di PSHS Ys 
LDB #11 BYTES TO COMPARE 
LEAU 2a TO START OF ARGUMENT 
LDA s¥ 
REQ BISE1 IF EMPTY ENTRY 
BMI Bi9E1 IF END OF DIRECTORY 
BISE LDA s Ut 
CMPA Ht? * WILDCARD? 
BEG Bi9SF 
CMPA sV¥+ 
BEG Bi?G 
* NO MATCH 
BiSE1 PULS Ys 
INC 13VU 
LDA 1sU 
CMPA #72 ANY MORE? 
BCC BiSNO 
LEAY oes ¥ POINT AT NEXT ENTRY 
CMPY #SYSBUF +255 
BCS Bi9Di 
* READ NEXT SECTOR 
LDY #SYSBUF 
INC aX 
BRA Bi9D 
BiSF LDA 3 ¥+ BYPASS SOURCE CHR 
Bi9G DECE 
BNE BiSE 
* MATCH FOUND 
PULS ¥aU 
ING 13: SEARCH CONTINUES WITH NEXT ENTRY 
LEAU St1lisv 
LDB #32 
BiSH LDA s¥+ 
STA s U+ 
DECRB 
BNE BiH 
RTS 
Bi9NO LDA #$FF 


ee 


PAGE 


27168 
47178 
@7188 
@71i9@ 
@72aa 
@7218 
Q7228 
7238 
27248 
7258 
27268 
27278 
27288 
27298 
47 328 
@731@ 
@7 328 
27338 
27342 
TOTAL 
TOTAL 


@54 OLY2 »5A:8 
230784 iBCR A7 41 
@30714 iBCD 39 

Q@3a72 

@3873A 1BCE alfalfa 
@3874A 1BCF AAA 1 
@3875 

Q3076 

QB3a77A IBD aralti 
23878 1BD@ 
3879 AACS 
23082 @718 
A388 1 1246 
B3882 BEA4 
A383 <@EB 
@3284 i@Az 
@3885 1@A5 
Z3286 QBR9 
Q3887 

23288 


ERRORS @@@a2--a0aaa 
WARNINGS @@@00-—-@@0a0 


b> 
* TO 


b-pPPrrprppprpp 


DOS ~ PAGING & OVERLAYS 


he ft 
~ & 


LASTPG 
B22 
BKSZ 
PGMSZ 
TOTSZ 
START 
END 
ENTRY 
LOWUSR 
PERLE 


STA 
RTS 


RMB 
RMB. 


OPT 
RMB. 
EGU 
EQU 
EQU 
EQU 
EQU 
EU 
Eu 
EQU 
EQU 
TT 
END 


isV SAY NO MORE 

; 

i 

L 

i END OF OVERLAYS 
LASTPG 

Bi7-Bié 


OVRLAY-ORGIN-1 

LASTPG-ORGIN-1 

DOS START OF DISK FILE 

LASTPG+DOS-ORGIN END OF DISK FILE 

OVRLAY INITIAL ENTRY POINT INTO PROGRAM 
OVRLAY+3 LOWEST POINT WHERE USER PGM CAN LOAD 
$1E@Q-LASTPG+ORGIN POINT THAT BASIC CLOBBERS 
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